VB教程：图片框（PictureBox）

作用：添加图形的容器。

在面向对象程序设计过程中，每一个对象的添加都必须有对应的载体或容器。在前面介绍的窗体、框架控件和图片框控件都可以作为容器来添加其他控件，与窗体和框架控件相比，图片框控件用作容器时，具有更多的图形功能。

Picture Box控件支持下列5种图形格式：

Bitmap位图：它将图像定义为点(像素)的图案。位图的文件扩展名是.bmp或.dib。

Icon图标：这是一种特殊类型的位图。图标的尺寸为32像素x 32像家，但在windows 98下，图标也可为16x16像素大小。图标的文件扩展名为.ico。

Metafile图元文件：这是将图形定义为编码的线段和图形。普通图元文件扩展名为．wmf。

JPEG：Internet上一种流行的压缩位图格式，支持8位和24位颜色。

GIF；Internet上一种流行的压缩位图文件格式，它可支持多达256种颜色。
（1）图片框的特殊属性

Align属性——返回或设置一个值，确定对象是否可在窗体上以任意大小、在任意位置上显示，或是显示在窗体的顶端、底端、左边或右边，而且自动改变大小以适应窗体的宽度。

语法结构：

object.Align [ = number ]

Align 属性的设置值及其说明

设置
数字 说明
VbAlignNone 0 无，可以在设计时或在程序中确定大小和位置
VBAlignTop 1 顶部，对象显示在窗体的顶部，其宽度等于窗体的ScaleWidth属性设置值
VbAlignBotton 2 底部，对象显示在窗体的底部，其宽度等于窗体的ScaleWidth属性设置值
VbAlignLeft 3 左边，对象在窗体左面，其宽度等于窗体的ScaleWidth属性设置值
vbAlignRight 4 右边，对象在窗体右面，其宽度为窗体的ScaleWidth属性设置值

注意：

利用Align属性可以很快地在窗体的顶部或底部创建工具栏或状态栏。

当Align属性值设置为1或2时，用户改变窗体的大小，控件会自动地改变大小以适合窗体的尺寸。
Appearance 属性——用于设置窗体上PictureBox控件在设计时的绘图风格。它有两个设置值：

0——平面绘制控件和没有可视化效果的窗体

1——带有三维效果的绘制控件

AutoRedraw 属性——用于设置控件使图形持久地输出，即是否具有自动重绘功能。

语法结构：

object.AutoRedraw [ = Boolean ]

Ture——有自动重绘的效果，图形和文本输出到屏幕的同时存储在内存的图像中

False——无自动重绘的效果，且将图形或文本只写到屏幕上

例1：见教材P147。

界面：

代码：

Private Sub Form_Click()

Dim x, y As Integer
Dim r As Integer
Picture1.AutoRedraw = True
x = Picture1.ScaleWidth / 2
y = Picture1.ScaleHeight / 2
For r = 0 To Picture1.ScaleWidth / 2
Picture1.Circle (x, y), r, RGB(Rnd * 255, Rnd * 255, Rnd * 255)
Next r
Picture1.AutoRedraw = False

End Sub