第6章常用标准控件.ppt

常用标准控件6.1文本控件6.1.1Label属性BorderStyle
0（Image和Label控件的缺省值）无。
1（MSFlexGrid、PictureBox、TextBox和OLE容器控件的缺省值）固定单边框。
Enabled
返回或设置一个值，该值用来确定一个窗体或控件是否能够对用户产生的事件作出反应。
Enabled属性允许在运行时使窗体和控件成为有效或无效
BackStyle
返回或设置一个值，它指定Label控件或Shape控件的背景是透明的还是非透明的。
0透明－在控件后的背景色和任何图片都是可见的。
1（缺省值）非透明－用控件的BackColor属性设置值填充该控件，并隐藏该控件后面的所有颜色和图片。6.1.2TextBox属性1TextBox属性2ScrollBars
指示一个对象是有水平滚动条还是有垂直滚动条。在运行时是只读的。
TextBox控件，ScrollBars属性的设置值为：
VbSBNone 0 （缺省值）无
VbHorizontal 1 水平
VbVertical 2 垂直
VbBoth 3 两种
对于ScrollBars的属性设置值为1（水平）、2（垂直）、或3（两种）的TextBox控件，必须将MultiLine属性设置为True。TextBox属性36.1.3TextBox事件[例6.2]同步显示

PrivateSubText1_Change()
Text2.Text=Text1.Text
EndSub

PrivateSubCommand1_Click()'重新输入
Text1.Text=""
Text1.SetFocus
EndSub6.2图形控件6.2.1PictureBox控件Image控件Print方法允许向PictureBox控件输出文本，如同向打印机输出一样。有几种字体属性可以控制由Print方法输入的文本的特性；Cls方法可以清除输出。
Circle、Line、Point和Pset方法可以用于在PictureBox中画图形。一些属性如DrawWidth、FillColor和FillStyle允许自定义图形的外观。
用PaintPicture方法在图片控件内移动Image、并在几幅不同的Image间快速变化就能产生动画。PictureBox控件与Image控件部分属性1Picture属性Stretch属性图片框与图像框的区别图片的装入（运行阶段）如果要将图标赋予窗体，则要把LoadPicture函数的返回值赋给Form对象的Icon属性：
SetForm1.Icon=LoadPicture("MYICON.ICO")
图标也可以被赋予除Timer控件和Menu控件外的其它控件的DragIcon属性，例如：
SetCommand1.DragIcon=LoadPicture("MYICON.ICO")
使用LoadPicture可将图形文件载入到系统剪贴板，如下所示：
Clipboard.SetDataLoadPicture("PARTY.BMP")用LoadPicture函数，例如：
Form1.Picture=LoadPicture("C:\windows\backgrnd.gif")
Form1.Picture=LoadPicture()'清除图片
复制其它对象的图片，例如：
Picture1.Picture=Image1.Picture[例6.8]图片框和图像框应用示例
Image1的属性设置：
Stretch为True
BordeStyle为1
Height和Width均为1800
'在窗体的通用段声明模块变量：
DimnAsInteger'n记录图片框中的输出项数
PrivateSubForm_Load()
n=0'n赋初值
EndSub'单击“放大”按钮
PrivateSubCommand1_Click()
Image1.Width=Image1.Width*1.25
Image1.Height=Image1.Height*1.25
Picture1.Print"放大图片":n=n+1
Ifn=10ThenPicture1.Cls:n=0
EndSub
'单击“缩小”按钮
PrivateSubCommand2_Click()
Image1.Width=Image1.Width*0.75
Image1.Height=Image1.Height*0.75
Picture1.Print"缩小图片":n=n+1
Ifn=10ThenPicture1.Cls:n=0
EndSubPrivateSubCommand3_Click()'单击“还原”按钮
Picture1.Cls
Image1.Height=1800
Image1.Width=1800
EndSub6.2