Lastnost Tag

Velja za

Shrani dodatne informacije o obrazec, poročilo, stran za dostop do podatkov, odsek ali kontrolnik, ki jih zahteva Accessov program. Niz za branje/pisanje.

expression.Tag

izraz Obvezen. Izraz, ki vrne enega od predmetov s seznama »Velja za«.

Opombe

Vnesete lahko izraz niza, ki ima lahko največ 2048 znakov. Privzeta nastavitev je Niz ničelne dolžine (" ").

To lastnost lahko nastavite tako, da uporabite list z lastnostmi predmeta, makro ali kodo Visual Basic for Applications (VBA).

Za razliko od drugih lastnosti, nastavitev lastnosti Tag ne vpliva na noben atribut predmeta.

S to lastnostjo lahko predmetu dodelite niz za identifikacijo, ne da bi vplivali na druge njegove nastavitve lastnosti ali povzročili morebitne druge stranske učinke. Lastnost Tag je priročna, ko želite preveriti identiteto obrazca, poročila, strani za dostop do podatkov, razdelka ali kontrolnika, ki je določen kot spremenljivka procedure.

Primer

V spodnjem primeru je lastnost Tag uporabljena za prikaz sporočil po meri o kontrolnikih v obrazcu. Ko ima kontrolnik fokus, je opisno besedilo prikazano v kontrolniku oznake, imenovanem lblMessage. Besedilo za sporočilo določite tako, da nastavite lastnost Tag za vsak kontrolnik na kratek besedilni niz. Ko kontrolnik pridobi fokus, je njegova lastnost Tag povezana z lastnostjo Caption kontrolnika oznake. Ta primer prikazuje opisno besedilo za besedilno polje txtDescription in ukazni gumb cmdButton na obrazcu.

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