Властивість 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. Рядок (читання й записування).

вираз.Tag

вираз – обов’язковий аргумент. Вираз, що повертає один з об’єктів зі списку "Стосується".

Зауваження

Ви можете ввести рядковий вираз завдовжки до 2048 символів. Стандартне значення – рядок нульової довжини (" ").

Цю властивість можна встановити, використовуючи вікно властивостей об’єкта, макрос або код Visual Basic for Applications (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, з яким ми вас можемо з’єднати.

×