点击Picture属性后面的带“?”符号的按钮,打开“加载图片”对话框,通过浏览找到需要的图形文件。
2)利用Windows的剪切板
将要装入的图形拷贝到Windows的剪切板,然后选中要装入的图片框,执行“粘贴”命令,图片框中就会显示出所要显示的图形。
如果要把图片框中的图形清空(即图片框中不显示任何图形),可以将Picture属性后面的内容清除(delete)。 2、在运行阶段装入图形
使用LoadPicture函数,给对象的Picture属性赋值。 [对象.]picture=LoadPicture(\文件名\[对象1.]Picture=[对象2.]Picture
卸载图片命令:[对象.]Picture=LoadPicture() 例1:
Private Sub Command1_Click()
Picture1.Picture = LoadPicture(App.Path & \ Image1.Picture = LoadPicture(App.Path & \End Sub
Private Sub Command2_Click()
Picture1.Picture = LoadPicture() Image1.Picture = LoadPicture() End Sub
例2:交换两个图片框中的图形。
Picture3.Picture = Picture1.Picture Picture1.Picture = Picture2.Picture Picture2.Picture = Picture3.Picture Picture3.Picture = LoadPicture() 例3:苹果的成长
Private Sub Form_Load() Image1.Stretch = True End Sub
Private Sub Image1_Click()
Image1.Width = Image1.Width + 100 Image1.Height = Image1.Height + 100 End Sub
二、按钮控件
接受用户输入的命令 输入命令可以有三种方式: (1)鼠标单击;
(2)按Tab键焦点跳转到该按钮, 再按回车键; (3) 快捷键(Alt+有下划线的字母) (一)按钮控件的属性 1、Caption: 标题属性——命令按钮显示的内容,可在某字母前加 “&“设置快捷键。例如: &Ok , 显示 Ok
2、Cancel:取消功能属性(逻辑值),当设置为Ture时,程序运行时按Esc键与单击此命令
- 41 -
按钮的效果相同。
注意:在一个窗体只能有一个按钮的Cancel属性设置为Ture 3、Default:确认属性(逻辑值),设置为True时,按Enter键相当于用鼠标单击了该按钮。
注意:在一个窗体只能有一个按钮的Default设置为Ture 4、Style: 确定显示的形式。 0-标准样式。只能显示文字。 1-图形格式。文字、图形均可 。
5、Picture、DownPicture、DisabledPicture
当Style属性设置为1时,这三个属性分别是按钮控件正常、按下和无效时显示的图片的路径及文件名。如果没有设置DownPicture和DisabledPicture属性,则按下和无效时显示的图片与正常时的相同。这三个属性可以在设计时通过属性窗口设置,也可以在运行时通过LoadPicture函数设置。
6、ToolTipText :设置工具提示,与Picture属性同时使用。如果仅用图形作为对象的标签,那么能够使用此属性以较少的文字解释每个对象。 (二)按钮控件的事件
按钮控件常用的事件是鼠标单击事件(Click),但不支持鼠标双击事件(DblCl