3.5.1 控件的公共属性
( 1 ) Name 属性:用于定义控件对象的名称。控件的 Name (名称)属性必须以字母开头,其后可以是字母、数字和下划线。名称长度不能超过 40 个字符。
( 2 ) Caption 属性:用于确定控件的标题。
Enabled 属性:决定控件是否对用户旌的事件做出相应。
Visible 属性:决定控件是否可见。
Height , Width , Top , Left 属性: Height 和 Width 属性确定控件的高度和宽度, Top
和 Left 属性用于确定控件在窗体中的位置。 Top 表示控件到窗体顶部的距离, Left 表示控件到窗体左边的距离。如图 3.7 所示。
图 3.7 控件的大小及位置
( 6 ) BackColor 和 ForeColor 属性:这两个属性用于设置控件的背景色和前景色。
( 7 ) FontName , FontSize , Fontbold , Fontitalic , FontStrikethru 和 FontUnderline 属性:这些属性用于设置推荐件中显显示文本所用的字体、字号、是否粗体、是否斜体、是否加删除线和是否带下划线。
( 8 ) Font 对象属性:确定控件中显示的文本所用字体的样式、大小、字体效果等。
3.5.2 命令按钮
1 .常用属性
( 1 ) Default 属性和 Cancel 属性:窗体上的命令按钮常会有一人“默认”按钮和一个“取消”按钮。
( 2 ) Style 属性:设置命令按钮的外观。
( 3 ) Value 属性:该属性只能在程序运行期间使用。设置为 True 表示该命令按钮被按下。
2 .常用事件和方法
命令按钮最常用的事件是 Click 事件,但不支持 DblClick 事件。
命令按钮常用的方法是 SetFocus 方法。
3.5.3 标签
标签( Label )主要用来显示比较固定的提示信息。
1 .常用属性
( 1 ) Alignment 属性:设置标签中文本的对齐方式。
( 2 ) AutoSize 属性:确定标签的大小是否根据标签的内容自动调整。
( 3 ) BoderStyle 属性:设置标签的边框。
( 4 ) BackStyle 属性:设置标签的背景模式。
( 5 ) WordWrap 属性:设定标签大小是否根据其内容改变垂直方向的大小,即是否增减行来适应内容的改变,但保持宽度不变。为了使 WordWrap 起作用,应把 AtuoSize 属性设置为 True 。
2 .常用的事件和方法
标签可触发 Click 和 DblClick 等事件。
标签支持 Move 方法,用于实现控件的移动。
3.5.4 文本框
1 .常用属性
( 1 ) Maxlength 属性:该属性确定文本框中文本的最大长度
( 2 ) Multiline 属性:该属性指定文本框中是否允许显示和输入多行文本。
( 3 ) PasswordChar 属性:该属性确定在文本框中是否显示用户输入的字符,常用于密码输入。
( 4 ) ScrollBars 属性:该属性指定在文本框中是否出现滚动条。
( 5 ) SelStart 、 SelLength 和 SelText 属性:这 3 个属性用来标识用户选定的文本,它们只在运行阶段有效。
( 6 ) Text 属性:该属性设置或返回文本框中所饮食的文本内容。
( 7 ) Locked 属性:该属性设置文本框是否可以进行编辑修改。
2 .常用事件和方法
文本框支持 Click , DblClick 等鼠标事件,同时支持 Chang , gotFocus , LostFocus 等事件。
文本框常用方法有 SetFocus 方法和 Move 方法。
[ 例 3.4] 输入一个总秒数,化成小时、分钟和秒数,然后显示出来。
( 1 )创建应用程序的用户界面和设置对象属性,如图 3.8 所示。

图 3.8 例 3.4 的运行结果
( 2 )编写两个命令按钮的单击事件过程代码如下:
Private Sub Command1_Click()
Dim h As Integer, m As Integer, s As Integer, t As Integer
t = Val(Text1.Text)
h = t \ 3600
t = t - h * 3600
m = t \ 60
s = t - m * 60
Text2.Text = h
Text3.Text = m
Text4.Text = s
Text1.SetFocus
End Sub
Private Sub Command2_Click()
End
End Sub |