5.7.1 图片框控件

　　设计包含有图片的窗体的方法是：首先，在窗体上要显示图片的位置放置一个图片框控件。然后，将所要的图片加载到图片框控件中即可。

　　可以加载到图片框控件中的图形格式有以下几种：

　　位图(bitmap),文件后缀为。bmp.

　　图标(icon),文件后缀为，ico.

　　Windows图元文件，文件后缀为。wmf.

　　JPEG或GIF文件，文件后缀分别为。jPg和。gif.

　　既可以在程序设计阶段向图片框加载图片，也可以在程序运行阶段加载图片。为图片框加载图片的方法有：

　　在程序设计时，通过在【属性】窗口中设置Picture属性来加载图片，加载方法与为窗体加载背景图片的方法相同。

　　在程序设计时，利用剪贴板加载图片。例如，有时可能希望添加由Windows画图板创建的位图图像，可以直接把图像复制到剪贴板上，选定图片框或图像框控件，然后使用键盘快捷方式Ctrl+V或使用【编辑】菜单的【粘贴】命令即可。

　　在程序运行时，使用LoadPicture()函数加载图片。加载语句如下：

　　图片框名，Pirture= LoadPicture(文件名)

　　注意：在程序运行时，不能直接将文件名赋予控件的Picture属性，语句如下：

　　要清除图形框控件中的图形，应使用不指定文件名的LoadPicture函数，详句如下：

　　Picturel.Picture=LoadPicture.

　　实例5.14加载图片。 [NextPage]

　　在该实例中，程序运行后，用户可以更改图片框中的图片，也可以清除图片框中的图片，在更改或清除图片后，用户还可以恢复图片框中原有的图片。

　　在窗体中放置一个图片框控件和三个按钮控件。其中各对象的属性设置。

　　双击【更换图片】按钮，打开【代码】窗口，将下列代码添加到ComGhangeClick事件过程中：

　　Private sub comchangle_click()

　　Picture1.picture=LoadPirture(“d：programs\office97\Clipart\Popular\Agree2.wmf”)

　　End sub

　　双击【清除图片】按钮，将下列代码添加到ComClear_Chick事件过程中：

　　Private sub comchangle_click()

　　Picture1.picture=LoadPirture

　　End sub

　　双击[恢复图片]按钮，将下列代码添加到ComUndo_Click事件过程中：

　　Private Sub ComUndo_Click()

　　Picture.oricture=LoadPricture(“d：programs\office97\Clipart\Popular\Agree.wmf”)

　　End Sub

　　运行该程序，单击【更换图片】按钮，则图片框中的图片就被更换为另一副图片，如图5.44所示。单击【清除图片】按钮，则图片框中的图片被清除，如图5.45所示口单击【恢复图片】按钮，则图片框中又出现初始的图片。

　　在将工程保存后，VB为每个包含有图片的窗体生成一个扩展名为FRS的文件，这是应用程序存放图片的地方。

　　在默认情况下，图片框控件的大小不随其中加载图片的大小而变化，并且图片框控件不提供滚动条，因此，如果加载的图片比图片框控件大，则超过的部分显示不出来(除。wmg格式的文件外，该格式的文件会自动调整大小以填满图片框).要使图片框控件自动调整大小以显示完整图形，应将其AutoSize属性设置为True.这样，图片框控件将自动调整大小以适应加载的图形。

　　图片框控件可以作为其他控件的容器，在分组单选项时，可以使用图片框控件替代框架控件。

　　与窗体一样，图片框控件也可以使用Print方法来输出文本，使用Cls方法清除文本。例如，下列语句将在图片框Pictures中显示"在图片框中显示文本"几个字：

　　Picture1.Print "在图片框中显示文本"