Свойство Tag (Тег)

Применение

Объект BoundObjectFrame

Объект Image

Объект OptionGroup

Объект SubForm

Объект CheckBox

Объект Label

Объект Page

Объект TabControl

Объект ComboBox

Объект Line

Объект PageBreak

Объект TextBox

Объект CommandButton

Объект ListBox

Объект Rectangle

Объект ToggleButton

Объект CustomControl

Объект ObjectFrame

Объект Report

Объект Form

Объект OptionButton

Объект Section

Содержит дополнительные сведения о форме, отчете, странице доступа к данным, разделе или элементе управления, которые требуются приложению Microsoft Office Access 2007. Возвращает доступное для чтения и записи значение типа String.

выражение.Tag

выражение (обязательно). Выражение, возвращающее один из объектов из списка "Применение".

Замечания

Можно ввести строковое выражение, которое содержит до 2048 знаков. По умолчанию используется пустая строка (" ").

Это свойство можно задать с помощью страницы свойств объекта, макроса или кода Visual Basic для приложений (VBA).

В отличие от других свойств, значение свойства Tag (Тег) не влияет на атрибуты объекта.

Это свойство используется для назначения строки идентификатора объекту без воздействия на любые другие значения его свойств или других побочных эффектов. Свойство Tag удобно использовать для проверки идентификаторов формы, отчета, страницы доступа к данным, раздела или элемента управления, передаваемых в процедуру в качестве переменной.

Пример

В следующем примере свойство Tag используется для отображения пользовательских сообщений об элементах управления в форме. Когда элемент управления получает фокус, в элементе управления надписи отображается текстовое описание lblMessage. Для свойства Tag каждого элемента управления задается короткая текстовая строка, определяющая текст этого сообщения. Когда элемент управления получает фокус, его свойство Tag назначается свойству Caption (Подпись) элемента управления надписи. В этом примере в форме отображается текстовое описание для поля 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
Совершенствование навыков
Перейти к обучению
Первоочередный доступ к новым возможностям
Присоединиться к программе предварительной оценки Office

Были ли сведения полезными?

Спасибо за ваш отзыв!

Благодарим за отзыв! Возможно, будет полезно связать вас с одним из наших специалистов службы поддержки Office.

×