2022人教版信息技术九年级第7课使用图片框控件（共26张）

2016人教版信息技术九年级第7课宿松县花凉初中吴昊wuhao2gyouxiang@使用图片框控件2016年9月19日学习内容1、图片框控件的使用。2、loadpicture（）函数的使用。一、设计窗体二、设置对象属性三、编写程序代码四、测试并保存程序操作步骤：注意：如果有误，返回到设计状态，继续编辑修改。

函数是一些可以由程序调用的程序代码。

VB中有两类函数：用户定义的函数和内部函数。

LoadPicture()函数的一般格式是：LoadPicture(“图像文件名”)“图像文件名”：应包含图像文件所在的路径。知识点：PictureBox和Loadpictur（）函数在工具箱中的PictureBox是图片框控件按钮.图片框控件主要用于“.bmp,.ico,.jpg,.gif,.wm等多种格式的图像文件。可以通过Loadpictur（）函数在该图片框里显示出指定的图片。。

设计一个引爆地雷的程序。运行这个程序时，单击“点火”按钮，会显示一个地雷引信被点燃的图片；单击“爆炸”按钮，会显示一个地雷爆炸的图片。课堂作业1请翻到第62页这个程序有哪些控件？一、设计窗体对象名称属性属性值Form1Picture1Option1Option2Command1Form1Picture1Opt1Opt2Cmdexitcaptioncaptioncaptioncaptioncaption地雷引爆Picture1点火爆炸退出二、设置对象属性

编写代码之前，我们应该知道

Loadpicture（）函数的用法。在VB程序中，可以通过用于Loadpicture（）函数在图片框里显示指定的图片。三、编写程序代码第一步：执行“视图→代码”命令，打开“代码”窗口。第二步：在对象框中选定option1，在事件框中会出现默认的事件名Click，然后为option1-Click（）过程编写代码。PrivateSubOpt1_Click()

Picture1.Picture=LoadPicture("d:\vbImage\点火.jpg")EndSubPrivateSubOpt2_Click()

Picture1.Picture=LoadPicture("d:\vbImage\爆炸.jpg")EndSubPrivateSubOpt2_Click()End

EndSub文件夹名用汉字行不行？文件名呢三、编写程序代码请同学们注意看下面的代码，下划线的代码表示什么？Picture1.Picture=LoadPicture("d:\vbImage\1.jpg")答：

LoadPicture函数可以调用图像1文件，使图片框中显示出来。四、测试并保存程序

单击”运行”按钮，测试这个程序。单击各个选项按钮，看是否能在图片框中显示指定的图片。如果有错误，单击工具栏中的按钮，返回设计状态，继续编辑修改。程序无误后，保存文件并把它生成可执行程序。四、测试并保存程序课堂作业2第一：设计窗体界面

第二：设置属性窗口对象属性属性值Form1Caption公园四景BorderStyle1-FixedSinglepictureBox（名称）PicgardenOption1（名称）Opt1Caption草原八骏Option2（名称）Opt2Caption水关心意Option3（名称）Opt3Caption大都庆典Option4（名称）Opt4Caption

鞍缰盛世PrivatesubOpt1-Click（）

picgarden.picture＝Loadpicture（〝d:﹨vbtupian﹨1.jpg〞）Endsub开始一个过程结束

第三：编写代码

LoadPicture函数调用图像1文件PrivatesubOpt2-Click（）

picgarden.picture＝Loadpicture（〝d:﹨vbtupian﹨.jpg〞）Endsub开始一个过程结束2

LoadPicture函数调用图像2文件第四：测试并保存程序课堂作业3编制明星照片.frm对象属性属性值Form1Caption明星照片pictureBox（名称）picture1Option1（名称）Option1CaptionmaykolOption2（名称）Option2CaptionarkenOption3（名称）Option3CaptionC罗Option4（名称）Option4CaptionChenglong

二、设置对象属性三、编写程序代码编制maykol、arken图片代码PrivatesubOption1-Click（）picture1.picture＝Loadpictured:﹨tupian﹨maykol.jpg〞）EndsubPrivatesubOption2-Click（）picture1.picture＝Loadpicture（〝d:﹨tupian﹨arken.jpg〞）Endsub三、编写程序代码编制c罗、chenglong图片代码PrivatesubOption3-Click（）picture1.picture＝Loadpicture（〝d:﹨tupian﹨c罗.jpg〞）EndsubPrivatesubOption4-Click（）picture1.picture＝Loadpicture（〝d:﹨tupian﹨chenglong.jpg〞）Endsub四、测试并保存程序

单击”运行”按钮，测试这个程序。单击各个选项按钮，看是否能在图片框中显示指定的图片。如果有错误，单击工具栏中的按钮，返回设计状态，继续编辑修改。程序无误后，保存文件并把它生成可执行程序。总结11、哪位同学可以告诉我，今天我们新学的是哪个控件和函数？答：今天我们所学的是图像控件Picture和它的函数