资源简介

(共18张PPT)
电子相册
广东教育出版社
八年级信息技术下册
想一想
请你设想一下最简单的电子相册使用情景。
欣赏
分析算法
2、单击“哈士奇”按钮控件时，Image控件加载图片“哈士奇.jpg”；
1、创建一个图像框（Image）控件和四个CommandButton按钮控件；
3、单击“博美犬”按钮控件时，Image控件加载图片“博美犬.jpg”；
4、单击“吉娃娃”按钮控件时，Image控件加载图片“吉娃娃.jpg”；
5、单击“退出”按钮控件时，退出程序；
Image控件
Image控件可以显示来自位图、图标及其他格式的图形文件，与PictureBox(图片框)控件占用内存少，显示速度快。
1、
picture属性可用于窗体、图片框和图相框等控件的图片加载，可通过属性窗口进行加载。
2、Stretch属性只存在于Image中，用来自动调整图相框中图形内容的大小。
True
将自动放大或缩小图像框中的图形使其与图相框大小想适应
False
LoadPicture函数
LoadPicture函数是把指定存储位置的图形文件加载到窗体、图片框或图像框的Picture属性中。
对象名称.Picture=LoadPicture(App.Path
&
”\pic\hsp.jpg”)
使用App.Path必须要先保存工程和窗体文件，并确保工程、窗体文件和图片（或图片文件夹）在同一个目录下.
保存
VB中执行保存命令时，与平时的文件保存不同，它包括窗体保存和工程保存两步，为了方便管理，保存时需要先新建一个文件夹，把窗体文件和工程文件放在同一个文件夹中。
动手实践
1、打开VB
2、设计界面
名称：CmdHsq
Caption:哈士奇
名称：CmdBmq
Caption:博美犬
名称：CmdJww
Caption:吉娃娃
名称：CmdQuit
Caption:
退出
动手实践
3、保存工程
将文件接收柜中的“素材请以班级+名字+电子相册重命名”
命名为
班级+名字+电子相册
，并将工程和窗体保存在此文件夹中。
动手实践
3、编写代码
4、按F5运行
动手实践
实现单击哈士奇按钮时显示哈士奇图片
Private
Sub
CmdHsq_Click()
ImgDog.Picture
=
LoadPicture(App.Path
&
"\Pic\hsq.jpg")
End
Sub
动手实践
实现单击博美犬按钮时显示博美犬图片
Private
Sub
CmdBmq_Click()
ImgDog.Picture
=
LoadPicture(App.Path
&
"\pic\bmq.jpg")
End
Sub
动手实践
实现单击吉娃娃奇按钮时显示吉娃娃图片
Private
Sub
CmdJww_Click()
ImgDog.Picture
=
LoadPicture(App.Path
&
"\pic\jww.jpg")
End
Sub
动手实践
实现单击退出时退出运行
Private
Sub
CmdJww_Click()
End
End
Sub
动手实践
3、编写代码
4、按F5运行
调试程序
1、避免手动输入时的拼写错误。
2、多用系统提供的选项输入。
说说：你在运行程序时出现哪些问题，你又是怎样解决的？
程序设计的基本过程
分析问题
设计算法
编写程序
调试程序
谢谢

展开更多......

收起↑