Odnosi se na
|
Objekt BoundObjectFrame |
Objekt Image |
Objekt OptionGroup |
Objekt SubForm |
|---|---|---|---|
|
Objekt CheckBox |
Objekt Label |
Objekt Page |
Zbirku TabControl |
|
Objekt ComboBox |
Objekt Line |
Objekt PageBreak |
Objekt TextBox |
|
Objekt CommandButton |
Objekt ListBox |
Objekt Rectangle |
Objekt ToggleButton |
|
Objekt CustomControl |
Objekt ObjectFrame |
Objekt Report |
|
|
Objekt Form |
Objekt OptionButton |
Objekt Section |
Pohranjuje dodatne informacije o obrazac, izvješće, stranica za pristup podacima, odjeljak ili kontrola koje je potrebna aplikacija programa Access. Niz za čitanje/pisanje.
izraz.Tag
expression Obavezno. Izraz koji vraća jedan od objekata na popisu Primjenjuje se na.
Napomene
Možete unijeti nizovni izraz dugačak najviše 2048 znakova. Zadana je postavka niz nulte dužine (" ").
To svojstvo možete postaviti pomoću list svojstava objekta, makronaredba ili koda programa Visual Basic for Applications (VBA).
Za razliku od drugih svojstava, postavljanje svojstva Tag ne utječe ni na koji atribut objekta.
Pomoću tog svojstva objektu možete dodijeliti identifikacijski niz ne utječući na druge postavke njegovih svojstava i ne uzrokujući druge neželjene rezultate. Svojstvo Tag korisno je kada morate provjeriti identitet obrasca, izvješća, stranice za pristup podataka, sekcije ili kontrole koji su proceduri proslijeđeni kao varijabla.
Primjer
U sljedećem se primjeru pomoću svojstva Tag prikazuju prilagođene poruke o kontrolama u obrascu. Kada se na kontrolu premjesti fokus, u kontroli natpisa pod nazivom lblMessage prikazuje se opisni tekst. Tekst poruke navodite postavljanjem kratkog tekstnog niza za svojstvo Tag za svaku kontrolu. Kada se na kontrolu premjesti fokus, njezino svojstvo Tag dodjeljuje se svojstvu Caption kontrole oznake. U ovom se primjeru na obrascu prikazuje opisni tekst za tekstni okvir pod nazivom txtDescription i naredbeni gumb pod nazivom 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
