VB教程:图像框(Image)
文章作者 100test 发表时间 2007:03:10 18:29:28
来源 100Test.Com百考试题网
12、图像框(Image)![](/ncre2/Files/2007-2/10/104527692.gif)
Image控件使用方法与PictureBox类似,用来装入图形文件。
另外:Image控件还响应Click事件,并可用Image控件代替命令按钮或作为工具条的工程,还可用来制作简单动画。
Picture属性——加载图片。
可以通过属性窗口直接设置Picture属性加载图片,也可以在程序运行时,利用LoadPicture函数来设置,或者可以使用剪贴板(使用方法是常用的复制Ctrl C和粘贴Ctrl V)。这些和PictureBox控件相同。
Stretch属性——实现控件包含图形的大小随着控件的大小进行调整。
Ture——表示图形要调整大小以与控件相适应
Flase——表示控件要调整大小以与图形相适应(缺省值)
Image控件与PictureBox控件的区别:
-
Image控件使用的系统资源比PictureBox控件少,重新绘图速度快,但它仅支持PictureBox控件的一部分属性、事件和方法;
-
两种控件都支持相同的图片格式。但是在Image控件中图形可以伸展以适合控件的大小,而在PictureBox控件中仅可通过调整控件的大小以适合图形的大小,图形本身并不伸缩;
-
PictureBox控件可以作为容器(父控件),其中包括其它的控件(子控件),Image控件则不能。
-
图片框更灵活,且适用于动态环境,而图像框适用于静态环境,即不需要再修改的位图、图标、Windows元文件及其它格式文件。
一般在两者都满足需要的情况下,应优先考虑使用图像框。
例子:北京名胜图片。
界面:
![](/ncre2/Files/2007-2/10/104539156.jpg)
代码:
Private Sub Form_Load()
List1.AddItem "北海"
List1.AddItem "长城"
List1.AddItem "故宫"
List1.AddItem "十三陵"
List1.AddItem "天坛"
List1.AddItem "颐和园"
List1.AddItem "圆明园"
End Sub
Private Sub List1_Click()
Select Case List1.ListIndex
Case 0
Image1.Picture = LoadPicture("G:\图片\北海.jpg")
Label2.Caption = "北海"
Case 1
Image1.Picture = LoadPicture("G:\图片\长城.jpg")
Label2.Caption = "长城"
Case 2
Image1.Picture = LoadPicture("G:\图片\故宫.jpg")
Label2.Caption = "故宫"
Case 3
Image1.Picture = LoadPicture("G:\图片\十三陵.jpg")
Label2.Caption = "十三陵"
Case 4
Image1.Picture = LoadPicture("G:\图片\天坛.jpg")
Label2.Caption = "天坛"
Case 5
Image1.Picture = LoadPicture("G:\图片\颐和园.jpg")
Label2.Caption = "颐和园"
Case 6
Image1.Picture = LoadPicture("G:\图片\圆明园.jpg")
Label2.Caption = "圆明园"
End Select
End Sub
清除Image控件中的图片:
Picture1.picture = loadPicture("")
或不加(""),写成 Picture1.picture = loadPicture。
说明:
用loadPicture语句加载图片时,如改变图片的路径,可添加如下语句:
ChDrive App.Path
ChDir App.Path
这样,在loadPicture语句的()中,只需写入图片的文件名,不用指明路径,同时,将图片和程序生成的文件保存在同一个文件夹下。
[程序演示] [程序下载]