TextBox.Tag 属性 (权限)
Office 2013
本文内容
存储有关窗体、 报表、 节或控制一个 Microsoft Access 应用程序所需的额外信息。读/写,字符串。
语法
表达式 .Tag
表达式 一个代表 TextBox 对象的变量。
注解
可以为该属性输入一个长达 2048 个字母的字符串表达式。默认设置是零长度字符串(" ")。
与其他属性, Tag属性设置不会影响对对象的属性。
可以使用此属性可为对象指定一个标识字符串,而不影响任何其他属性设置或产生其他副作用。
当您需要检查窗体、 报表、 节或作为变量传递给过程的控件的标识时, Tag属性是非常有用。
示例
下面的示例使用Tag属性来显示有关窗体上的控件的自定义信息。当一个控件具有焦点时,
描述性文本显示在名为lblMessage的标签控件中。您可以通过将每个控件的Tag属性设置为
一个简短文本字符串来指定消息的文本。当某一控件获得焦点时,其Tag属性分配给该标签
控件的标题属性。本示例显示一个名为txtDescription的文本框和一个名为cmdButton在窗体上
的命令按钮的描述文本。
Sub Form_Load()
Dim frmMessageForm As Form
Set frmMessageForm = Forms!Form1
frmMessageForm!lblMessage.Caption = "" ' Clear text.
frmMessageForm!txtDescription.Tag = "Help text for the text box."
frmMessageForm!cmdButton.Tag = "Help text for the command button."
End Sub
Sub txtDescription_GotFocus()
' Tag property setting as caption.
Me!lblMessage.Caption = Me!txtDescription.Tag
End Sub
Sub txtDescription_LostFocus()
Me!lblMessage.Caption = ""
End Sub
Sub cmdButton_GotFocus()
' Tag property setting as caption.
Me!lblMessage.Caption = Me!cmdButton.Tag
End Sub
Sub cmdButton_LostFocus()
Me.lblMessage.Caption = " "
End Sub
下载示例