4.2图像框（ImageBox）.docVIP

4.2 图像框（ImageBox） 图像框（ImageBox）只能用于显示图形，没有图片框所拥有的其他功能；因此，图像框比图片框显示速度快、占用内存少。 4.2.1 属性 （1）Picture属性 和图片框的Picture属性相同。 （2）stretch 属性 指定是否缩放图形来适应控件大小。属性值为True或False。 False：缩放控件来适应图形的大小。此值为缺省值。 True：缩放图形来适应控件的大小。此值可能会使显示的图形变形失真。 4.2.2 应用举例 【例4.2】设计程序，演示图像框在stretch 属性不同选值时的状态。 分析：需要建立四个按钮，其中二个实现设定图像框的stretch属性值为True或False；另二个用来放大、缩小图像框，以演示stretch属性值为True时图形随图像框缩放。（如图4-3） （a）stretch值为False时 （b）值为True并放大时 （c）值为True并缩小时 图4-3 例4.2 stretch 属性演示 （1）界面设计 在窗体上添加一个图像框、四个命令按钮。 控件的大小、位置和命令按钮的Caption属性可参考图4-3。 （2）编写代码 依次双击窗体和各命令按钮，输入代码如下。 Private Sub Form_Load() Image1.Picture =LoadPicture(C:\VB\Face03.ico) End Sub 在程序启动时,为图像框装载图标“Face03.ico” Private Sub Command1_Click() “True”按钮事件过程 Image1.Stretch = True End Sub Private Sub Command2_Click() “False”按钮事件过程 Image1.Stretch = False End Sub Private Sub Command3_Click() “放大”按钮事件过程 Image1.Width = Image1.Width * 2 Image1.Height = Image1.Height * 2 End Sub 把Image1的宽度和高度值乘2再赋给其Width、Height属性 Private Sub Command4_Click() “缩小”按钮事件过程 Image1.Width = Image1.Width / 2 Image1.Height = Image1.Height / 2 End Sub 把Image1的宽度和高度值的一半赋给其Width、Height属性 按F5键运行程序，程序界面如图4-3（a）所示，此时单击“放大”按钮，虽然图像框已经扩大一倍（其不可见），但是因其Stretch值默认为False，所以图形并不随图像框的扩大而扩大。随后点击“True”按钮，将Stretch值更改为True，这时图形会为适应图像框的大小而放大，如图4-3（b）所示。正如图4-3（c）所示，按“缩小”按钮，图形会随图像框的缩小而变小。不论图形及图像框是在扩大还是已缩小，只要单击“False”按钮，都会使图像框缩放到图形原始大小的尺寸，来适应图形的正常显示，如图4-3（a）。 运行无误后，请保存工程，以备后用。 4.2.3 图像框与图片框的区别 虽然图像框与图片框的用法基本相同，但也有不少区别： （1）图像框比图片框占用的内存少，显示图形的速度快。 （2）图像框可以实现图形的缩放。 （3）图像框不能同图片框一样通过Print方法显示文本或使用显示图形方法输出图形。 （4）图像框不能像图片框一样来作为其他控件的容器。此差别说明如下： 例如在图像框中画一个命令按钮，图像框并不能作为此命令按钮的容器，他们是彼此独立的，二者之间没有固定的联系。图像框中的命令按钮不从属于图像框，不是图像框的组成部分，当移动图像框时命令按钮仍在原位置，不随之移动。如果单独移动命令按钮，可以把他移动到图像框之外。 如果在图片框内画一个命令按钮，图片框会成为这个按钮的容器。此时移动图片框，则命令按钮随之一起移动（命令按钮成为图片框的一个组成部分）。如果单独移动命令按钮，只能在图片框范围内移动，不能把他移动到图片框之外。