您现在的位置:首页 >> 网络教学 >> 常用控件 >> 内容

图形框和图像框

时间:2009-6-19 9:29:35 点击:3092

图形框和图像框

若要在应用程序中创作图形效果,可以使用图形框(PictureBox)和图像框(Image)控件。它们都可以显示BMPICOWMFGIFJPEG等文件的图形,而且图形框还可以作为容器放置其它控件,以及通过PrintPestLineCircle等方法在其中输出文本和画图。

7.6.1图形框

图形框的主要属性有PictureAutosize

(1)  Picture属性

Picture属性决定控件中所显示的图形文件,其值可以通过下列三种途径获得:

u      在设计状态直接选择图形文件设置Picture属性。

u      在程序运行时使用LoadPicture()函数装入图形,使用形式为:

图形框. PictureLoadPicture(“图形文件名”)

u      装入另一图形框中的图形,使用形式为:

图形框1. Picture=图形框2. Picture

(2)  Autosize属性

Autosize属性设置为True时,图形框将自动调整大小与显示的图片匹配;将Autosize属性设置为False时,则图形框不能自动改变大小,若加载的图形比控件大,则超过部分将被剪裁。

7.6.2 图像框

图像框和图形框基本相同,都有Picture属性,区别在于两点,一是图像框不能作为容器存放其它控件、二是图像框没有Autosize属性,但有Stretch属性。

Stretch属性用于伸展图像,当Stretch属性为False时,在设计状态,图像框可自动改变大小,以适应其中的图形,相当于图形框在Autosize属性设置为True时的功能,而在程序运行时图形框的大小不会改变,图形或剪裁占用图像框左上角部分空间,相当于图形框在Autosize属性设置为False时的功能;当Stretch属性为True时,加载到图像框的图形可自动调整尺寸,以适应图像框的大小,图形有可能会失真。利用图像框的Stretch属性可实现图形有缩放。

7.7设计一个图形缩放程序。如图7-13所示,在窗体上添加一个图像框,一个复选框和一个滚动条对象,在设计状态,image1Stretch属性为False,装入图形后自动调整大小,此时image1的大小就是图像的大小,滚动条的MinMaxValue属性分别为02010,缩放比例为Hscroll.Value/10,因此最多可以放大一倍。为了能观察到图像框的范围,将图像框的BorderStyle设置为1

事件代码如下:

Dim H, W As Integer    ' HW分别存放图形的原始大小

Sub Check1_Click()

Image1.Stretch = Check1.Value   '复选框控制Image1Stretch属性

End Sub

Sub Form_Load()

H = Image1.Height           ' 初始时,Image1的高度就是图像的原始高度

W = Image1.Width            ' 初始时,Image1的宽度就是图像的原始宽度

End Sub

Sub HScroll1_Scroll()

Image1.Height = H * HScroll1.Value / 10     ' Image1按比例缩放高度

Image1.Width = W * HScroll1.Value / 10      ' Image1按比例缩放宽度

End Sub

作者:Admin  
相关文章
  • 没有相关文章
本类推荐
  • 没有
本类固顶
  • 没有
  • VB程序设计学习网站(赣南师范学院) © 2008 版权所有 All Rights Reserved.
  • 地址:江西省赣州市经济技术开发区 赣南师范学院数学与计算机科学学院 邮政编码:341000
    Email:ZQ188@163.com 技术支持QQ:87319633 移ICP备10086号
  • GnsySjxy! V2.4