Стосується
Об’єкт 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
expression — обов’язковий аргумент. Вираз, який повертає один з об'єктів у списку "Застосовується до".
Зауваження
Ви можете ввести рядковий вираз завдовжки до 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