第七课
使用图片框控件
Picture Box
操作之前我们设计程序的界面！
请翻到第62页
这个程序有这个控件？
同学们自己做，老师帮你们！
地雷引爆
Picture1
点火
爆炸
退出
接下来就请同学们上黑板设计窗体！
同学们猜猜看，下面的是哪个控件的代码？
Private Sub Opt1_Click()
Picture1.Picture = LoadPicture("d:\vbImage\点火.jpg")
End Sub
Private Sub Opt2_Click()
Picture1.Picture = LoadPicture("d:\vbImage\爆炸.jpg")
End Sub
Private Sub Opt2_Click()
End
End Sub
文件夹名用汉字行不行？
文件名呢
请同学们注意看下面的代码，下划线的代码表示什么？
Picture1.Picture = LoadPicture("d:\vbImage\1.jpg")
答： LoadPicture 函数可以调用图像文件，使图片框中显示出来。
总结
哪位同学可以告诉我，今天我们新学的是哪个控件和函数？
答：今天我们所学的是图像控件Picture和它的函数LoadPicture
载入图片是我们因该注意些什么问题呢？
答：1、路径和盘符名称要正确。
2、文件夹的名称要用英文。
3、载入的图片名称等要和代码窗口的名称一致。
作业！
同学们回家以后把上面的程序在做一遍，并把作品带到学校，给同学们演示或欣赏。
今天的课到此结束，谢谢大家！