资源简介

(共25张PPT)
第7课
使用图片框控件
学习内容
1、图片框控件的使用。
2、loadpicture（）函数的使用。
一、设计窗体
二、设置对象属性
三、编写程序代码
四、测试并保存程序
操作步骤：
注意：如果有误，返回到设计状态，继续编辑修改。
函数是一些可以由程序调用的程序代码。
VB中有两类函数：用户定义的函数和内部函数。
LoadPicture()函数的 一般格式是：LoadPicture(“图像文件名”)
“图像文件名”：应包含图像文件所在的路径。
知识点：
PictureBox 和 Loadpictur（）函数
在工具箱中的PictureBox是图片框控件按钮.图片框控件主要用于“.bmp,.ico,.jpg,.gif,.wm等多种格式的图像文件。
可以通过Loadpictur（）函数在该图片框里显示出指定的图片。。
设计一个引爆地雷的程序。运行这个程序时，单击“点火”按钮，会显示一个地雷引信被点燃的图片；单击“爆炸”按钮，会显示一个地雷爆炸的图片。
课堂作业1
请翻到第62页
这个程序有哪些控件？
一、设计窗体
对象 名称 属性 属性值
Form1
Picture1
Option1
Option2
Command1
Form1
Picture1
Opt1
Opt2
Cmdexit
caption
caption
caption
caption
caption
地雷引爆
Picture1
点火
爆炸
退出
二、设置对象属性
编写代码之前，我们应该知道
Loadpicture（）函数的用法。在VB程序中，可以通过用于Loadpicture（）函数在图片框里显示指定的图片。
三、编写程序代码
第一步：执行“视图→代码”命令，打开“代码”窗口。
第二步：在对象框中选定option1，在事件框中会出现默认的事件名Click，然后为option1 -Click（）过程编写代码。
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 函数可以调用图像1文件，使图片框中显示出来。
四、测试并保存程序
单击”运行”按钮，测试这个程序。单击各个选项按钮，看是否能在图片框中显示指定的图片。如果有错误，单击工具栏中的按钮，返回设计状态，继续编辑修改。
程序无误后，保存文件并把它生成可执行程序。
四、测试并保存程序
课堂作业2
第一：设计窗体界面
第二：设置属性窗口
对 象 属 性 属 性 值
Form1 Caption 公园四景
Border Style 1-Fixed Single
picture Box （名称） Picgarden
Option1 （名称） Opt1
Caption 草原八骏
Option2 （名称） Opt2
Caption 水关心意
Option3 （名称） Opt3
Caption 大都庆典
Option4 （名称） Opt4
Caption 鞍缰盛世
Private sub Opt1-Click（）
picgarden.picture＝Loadpicture
（〝d:﹨vbtupian﹨1.jpg〞）
End sub
开始一个过程
结束
第三：编写代码
LoadPicture 函数调用图像1文件
Private sub Opt2 -Click（）
picgarden.picture＝Loadpicture
（〝d:﹨vbtupian﹨ .jpg〞）
End sub
开始一个过程
结束
2
LoadPicture 函数调用图像2文件
第四：测试并保存程序
课堂作业3
编制明星照片.frm
对 象 属 性 属 性 值
Form1 Caption 明星照片
pictureBox （名称） picture1
Option1 （名称） Option1
Caption maykol
Option2 （名称） Option2
Caption arken
Option3 （名称） Option3
Caption C罗
Option4 （名称） Option4
Caption Chenglong
二、设置对象属性
三、编写程序代码
编制maykol、arken图片代码
Private sub Option1-Click（）
picture1.picture＝Loadpictured:﹨tupian﹨maykol.jpg〞）
End sub
Private sub Option2-Click（）
picture1.picture＝Loadpicture（〝d:﹨tupian﹨arken.jpg〞）
End sub
三、编写程序代码
编制c罗、chenglong图片代码
Private sub Option3-Click（）
picture1.picture＝Loadpicture（〝d:﹨tupian﹨c罗.jpg〞）
End sub
Private sub Option4-Click（）
picture1.picture＝Loadpicture（〝d:﹨tupian﹨ chenglong .jpg〞）
End sub
四、测试并保存程序
单击”运行”按钮，测试这个程序。单击各个选项按钮，
看是否能在图片框中显示指定的图片。如果有错误，单击工具栏中的按钮，返回设计状态，继续编辑修改。
程序无误后，保存文件并把它生成可执行程序。
总结
1
1、哪位同学可以告诉我，今天我们新学的是哪个控件和函数？
答：今天我们所学的是图像控件Picture和它的函数LoadPicture（图像文件名）。
2
2、载入图片是我们因该注意些什么问题呢？
答：1、路径和盘符名称要正确。
2、文件夹的名称要用英文。
3、载入的图片名称等要和代码窗口的名称一致。

展开更多......

收起↑