Visual Basic程序设计教程第5章 常用控件程序设计.pptVIP

5.3 图片框与图像框控件 第*页 图片框(PictureBox)控件的主要作用是为用 户显示图片，也可作为其他控件的容器。实际显示的图片是由Picture属性决定的。 5.3.1 图片框 1. 主要属性 (1)Picture属性 Picture属性用于窗体、图片框和图像框。它可 通过属性窗口进行设置，也可在程序中进行设置， 即使用LoadPicture()函数，装入图片文件。 第*页 在窗体、图片框和图像框中显示的图形以文件形式存放在磁盘上，VB6.0支持以下格式的图形文件。 ① 位图文件(Bitmap) *.BMP文件 ② 图标文件(Icon) *.ICO文件 ③ 图像文件(WMF) *.WMF文件 ④ 压缩位图文件(JPEG) *.JPG文件 ⑤ 压缩位图文件(GIF) *.GIF文件 AutoSize属性 图片框控件不能伸缩图像使图像适应它的大小。如 果把图片框控件的AutoSize属性设置为True，那么图 片框控件就会自动调整自身的大小以容纳整个图像。 第*页 2. 常用方法 在图片框中使用Cls方法和Print方法。 3. 图形文件的装入 图形文件的装入有两种方法：一种是在设计阶段 装入，另一种是在运行期间装入。 在设计阶段装入图形文件： 用属性窗口中的Picture属性装入 (2) 利用剪切板装入 第*页 在运行期间装入图形文件： Picture属性可以设置被显示的图片文件名(包括可选路径名)。在程序运行时，可以使用LoadPicture()函数，在图片框中装入图形。 格式：对象.Picture=LoadPicture(图形文件名) 功能：在图形框中装入一个图形。 说明：(1) 对象可以是图片框或图像框，也可以是窗体，如果是窗体，对象名可以省略。 (2) 如果删除一个图形，可以使用LoadPicture()函数，将一个空白图形装入图形框的Picture属性。 第*页 格式：对象.Picture=LoadPicture() (3) 如果图片框中已有图形，则被新装入的图形所覆盖。 (4) 装入图片框中的图形，可以拷贝到另一个图片框中。假设在窗体中已建立了两个图片框：Picture1与Picture2，则用： Picture1.Picture=LoadPicture(C:\Graphics\Icons\Arrows\arw06up.ico) Picture2.Picture=Picture1.Picture 可以把图片框Picture1中的图形拷贝到图片框 Picture2中。 第*页 例5-10：在窗体中添加两个图片框控件，设计一个实现图片的装入、图片的复制、删除图片和交换图片操作的应用程序。 图片框示例 (a) 装入图片 (b) 复制图片 (c) 交换图片 第*页 Private Sub Command1_Click() Picture1.AutoSize = True ‘可以根据图形大小调整图片框大小 x= App.Path + “\footprint.gif” ‘图形文件与应用程序在同一文件夹 y= App.Path + \golf.wmf x = InputBox(请输入第一个图形文件名（包括路径）：) ‘可以随机输入图形文件 y = InputBox(请输入第二个图形文件名（包括路径）：) Picture1.Picture = LoadPicture(x) Picture2.Picture = LoadPicture(y) End Sub Private Sub Command2_Click() Picture2.Picture = Picture1.Picture End Sub 第*页 Private Sub Command3_Click() Picture2.Picture = LoadPicture() End Sub Private Sub Command4_Click() Clipboard.Clear ‘ 清除剪贴板内容 Clipboard.SetData Picture1.Picture ‘ 将Picture1的图片复制到