VB教程：标签（Label）

1.标签

功能:在表单上相对固定的位置提供显示文本的区域。该区域不可编辑，主要用于显示提示信息。可以作为标题、列名、输入输出区的标识，也可以作为结果信息的输出区。它通常与文本控件一起使用。

注意:标签的内容是只读的，标签控件不接受用户的任何输入。

(1)公共属性

attribute
Description

Alignment设置文本中文本的对齐方式。有三种方式:0—左对齐，1—右对齐，2—居中
Caption设置标签的内容。值为任意字符串
Font指定标签的字体，包括字体、字形、字号、效果等。
ForColor设置标签的前景色
BackColor设置标签的背景色
BackStyle设置标签背景的图案。0—以重叠的方式在背景上显示标签，不覆盖原始背景；1-显示标签时覆盖背景，这是系统的默认值。
BorderStyle用于设置标签的框架形式。0—无边框；1-单线边框，默认值为0
。启用表示控件是否可用。True—表示它可以使用；Fasl—表示禁止使用(控件灰显)
Visible表示控件是否可见。True—指示控件可见；Fasl—指示控件不可见
Left指定它与容器左边缘的距离
Top指定它与容器上边缘的距离
Height指定它自己的高度
Width指定它自己的宽度。

(2)常见事件

事件
描述

标签内容改变时触发改变，即会执行为改变事件编写的事件处理程序

点击事件，标签被点击时触发事件
dbclick双击事件，标签被双击时触发事件[

但是，Label控件的主要功能是显示文本，一般不需要编写事件过程代码。

(3)其他用法

除了在设计阶段直接设置之外，标签通常用于在运行阶段显示时间。Time$是一个与时间相关的函数。由于它的返回值是一个字符串，所以可以将它赋给标签的标题，这样标签就可以用来显示时间，例如:

label1.caption=time$

如果要在标签中同时显示2行以上的字符串，必须依靠程序，即在字符串之间添加控制代码chr$(13)+chr$(10)(回车换行)，例如:
label1。caption = time $+CHR $(13)+CHR $(10)+

(4)示例

设置如下:

控件的属性设置和代码如下:

属性
对应代码

private subLabel1 _ click()
text1 . setfocus '点击标签label 1后，文本框text 1获得焦点(活动状态)。
End Sub
Private Sub label 2 _ Click()
text 2。SetFocus
End Sub

Private Sub label 3 _ Click()
text 3。SetFocus
End Sub
Private Sub label 4 _ Click()

End
private子命令1 _ click()
text 1 . text = " ' clear空文本框。
Text2。Text = ""
Text3。text = " "
End Sub
Private Sub command 2 _ Click()
label 4。标题=标签4。标题+标签1。标题和文本1。文本和标签2。标题和文本2。文本和标签3。标题和文本3。text+Chr(13)
End Sub
Private Sub command 3 _ Click()
End
End Sub