8.3图像框和图片框（课件）-《程序设计基础（Visual Basic）》同步教学（电子工业出版社）

项目8 Visual Basic常用内部控件 项目导入 控件是组成程序外部表象的基本元素，通过合理整齐地布置控件，可以方便地使用程序，使程序的易用性大大提高。 项目8通过4个任务介绍 Visual Basic 工具箱中提供的另外一组常用控件，这些控件有单选按钮、复选框、框架、列表框、组合框、图像框、图片框和计时器，介绍每类控件的常用属性、事件和方法。 2 项目目标 掌握单选按钮、复选框、框架、图像框、图片框，以及计时器等控件的常用属性和使用方法。 3 任务3 图像框和图片框 任务目标 掌握图片框的常用属性、方法和事件；能使用图片框处理简单的程序。 了解图像框的常用属性和事件。 任务实施 图像框和图片框控件都是为了更好地表现程序设计者的意图，以图形化的方式完成设计需要的一种手段。图像框一般作为图片显示居多，而图片框除了和图像框一样外，还可以担当框架的作用，使用更灵活，用途更广泛。 4 1．图片框 图片框（Picture Box）不仅可以用来显示图像，还可以作为其他对象的容器、显示图形方法的输出结果和 Print方法输出的文本。 其名称的默认值都为Picture1、Picture2、…。 5 属 性 名 类 型 说 明 Picture 字符型 用来设置要显示的图片文件名 AutoSize 布尔型 True：PictureBox控件将自动改变控件大小以显示全部内容 。 False(缺省值)：PictureBox控件保持大小不变，超出控件区域的内容被裁剪掉 6 装载图片的格式为： 对象名.Picture=LoadPicture("图片文件名") 删除图片的格式为： 对象名.Picture=LoadPicture("") 其中：对象名为PictureBox控件或Image控件。 （1）图片框的常用属性见表8-7。 表8-7 图片框的常用属性 （2）图片框的特殊使用 和Frame控件一样，PictureBox 控件上也可以画出其他控件，这些控件随PictureBox移动而移动，它们的Left和Top属性是相对于 PictureBox 而言的，与窗体无关。 （3）图片框的方法和事件。 图片框还经常用来显示Print方法输出的文本和图形方法的输出结果。也有很多事件，如Chang、Click等，使用方法视具体情况而定。 7 【例8.6】 通过图片框交换图片 8 在窗体中放置4个图片框，Picture1用于显示第1幅图片；Picture2 用于显示第2幅图片；中间图片框为Picture3，为了交换而设置，程序运行过程中它一直处于不可见状态，对结果的构图没有影响；Picture4作为一个容器控件，用于装载命令按钮。在 Picture4 中设置两个命令按钮，一个是【交换图片】按钮，一个是【结束】按钮。其设计界面如图8-12所示。 图8-12　设计界面 编写窗体Form1的Load事件代码： Private Sub Form_Load() Picture3.Visible=False ' 隐藏中间控件 Picture1.Picture=LoadPicture("f:\or.jpg") ' 确定指定路径下有指定图片 Picture2.Picture=LoadPicture("f:\rose.jpg") ' 确定指定路径下有指定图片 End Sub 编写窗体“交换图片”按钮的Click事件代码： Private Sub Command1_Click() Picture3.Picture=Picture1.Picture ' 通过 picture3 进行交换 Picture1.Picture=Picture2.Picture Picture2.Picture=Picture3.Picture End Sub 编写窗体“结束”的Click事件代码： Private Sub Command2_Click() End End Sub 9 10 运行程序，结果如图8-13所示。 图8-13　程序运行结果 2．图像框 图像框只能用于显示图像，不支持图形方法，也不能当做容器来使用。 作为图形控件，图像框比图形框占用更少的内存。 11 属 性 名 类 型 说 明 Picture 字符型 用来设置要显示的图片文件名 Stretch 布尔型 True：图片自动调整大小以适应Image控件 。False(缺省值)：Image控件要自动调整大小以适应图片 12 （1）图像框常用属性（见表8-8）。 表8-8 图像框常用属性 （2）图像框常用事件。 控件可接收Click等事件，因此可以充当图形命令按钮。 13 【例8.7】 在窗体上添加控件，设置Stretch属性，如图8-14所示。 14 单击工具栏中的控件，在窗体上添加图像控件。 设置属性：设置Stretch属性=True 设置Picture属性，在“加载图片”对话框中选择要加载的图片，单击“打开”按钮，加载图片。 图8-14 程序运行效果 用Print方法将文本框的内容打印到PictureBox控件中，用Cls方法将PictureBox控件中的内容清除。如图8-15所示。 15 图8-15 将文本内容输出到PictureBox 课堂反馈： $$