常用标准控件.ppt

第六章常用标准控件CommonStandardControl6.1文本控件TextControl
一标签Label
标签用来显示文本信息，它所显示的内容只能用Caption
属性设置或修改，不能直接编辑。
〓Alignment：确定标签中标题的放置方式，可以设置为
0、1或2，分别使标签的标题靠左、靠右和居中显示；
〓AutoSize：如果设置为True，则可根据Caption属性指
定的标题自动调整标签的大小；如果设置为False，则标签将
保持设计时定义的大小；〓BorderStyle：设置标签的边框，可以取值0和1，值为
0，无边框；值为1，有边框；
〓Caption：用来在标签中显示文本；
〓Enabled：返回或设置一个值，用来确定一个窗体或控
件是否能够对用户产生的事件作出反应；
〓BackStyle：可以取两个值，即0和1。值为1时，标签将
覆盖背景；值为0时，则标签为“透明”的；
〓WordWrap：用来决定标签的标题(Caption)属性的显示
方式。取值为True或False，如果为真，则标签将在垂直方向
变化大小以与标题文本相适应，水平方向的大小与原来所画
的标签相同；如果为假，则标签将在水平方向上扩展到标题
中最长的一行，在垂直方向上显示标题的所有行。想一想，这个效果是如何做出来的？二文本框TextBox
1.主要属性
〓MaxLength：设置允许在文本框中输入的最大字符数。
如果设置为0，则在文本框中输入的字符数不能超过32K。
〓MultiLine：设置为False，则在文本框中只能输入单行
文本；设置为True，可以使用多行文本，即在文本框中输入
或输出文本时可以换行，并在下一行接着输入或输出。按下
Ctrl+Enter可以插入一个空行。
〓PasswordChar：可用于口令输入。如果把该属性设置
为一个字符，例如星号，则在文本框中键入字符时，显示的
不是键入的字符，而是被设置的字符(如星号)。〓ScrollBars：该属性用来确定文本框中有没有滚动条，
可以取0、1、2、3四个值。如果设置为0，则文本框中没有
滚动条；如果设置为1、2或3，则文本框中可以显示水平滚动
条、垂直滚动条或同时显示水平和垂直滚动条。
〓SelLength：当前选中的字符数。如果值为0，则表示
未选中任何字符。
〓SelStart：定义当前选择的文本的起始位置。0表示选
择的开始位置在第一个字符之前，1表示从第二个字符之前
开始选择，依此类推。
〓SelText：该属性含有当前所选择的文本字符串，如果
没有选择文本，则该属性含有一个空字符串；如果在程序中
设置该属性，则用该值代替文本框中选中的文本。〓Text：设置文本框中显示的内容。
〓Locked：用来指定文本框是否可被编辑。设置为False
时，可以编辑文本框中的文本；设置为True时，可以滚动和
选择控件中的文本，但不能编辑。
2.主要方法和事件
〓Change：当用户向文本框中输入新信息，或当程序把
Text属性设置为新值从而改变文本框的Text属性时，将触发
该事件。
〓GotFocus：当文本框具有输入焦点时，键盘上输入的
每个字符都将在该文本框中显示出来。
〓LostFocus：当按下Tab键使光标离开当前文本框或者
用鼠标选择窗体中的其他对象时触发该事件。
〓SetFocus：该方法可以把光标移到指定的文本框中。
当在窗体上建立了多个文本框后，可以用该方法把光标置于
所需要的文本框，格式为：[对象.]SetFocus。这个例子如何实现？这个例子如何实现？PrivateSubCommand1_Click()
DimaAsDouble,bAsDouble,cAsDouble
a=Val(Text1.Text)
b=Val(Text2.Text)
Randomize
c=Int(Rnd*(b-a)+a)
d=Int(Rnd*(b-a)+a)
e=Int(Rnd*(b-a)+a)
Text3.Text=c&","&d&","&e
EndSub6.2图形控件DrawingControlCurrentX和CurrentY属性：用来设置下一个输出的水平或垂直坐标。只能在运行期间使用，格式如下:
[对象.]CurrentX[=x][对象.]CurrentY[=y]
Picture属性：用于窗体、图片框和图像框，可通过属性窗口设置，用来把图形放入这些对象中。
Stretch属性：用于图像框，用来自动调整图像框中图形内容的大小。取值为True或False。值为真时，将自动放大或缩小图像框中的图形以与图像框的大小相适应。图形文件的装入例子PrivateSubCommand1_Click()
Picture1.Picture=LoadPicture("f:\photo\ph