Tag tulajdonság

Érvényesség

További információkat tárol egy Access-alkalmazás által igényelt űrlap, jelentés, adatelérési lap, szakasz vagy vezérlő kapcsolatban. Olvasható/írható karakterlánc.

kifejezés.Tag

Kifejezés Megadása kötelező. Egy kifejezés, amely a Hatókör listában szereplő objektumok egyikét adja vissza.

Megjegyzések

A tulajdonság értékeként legfeljebb 2048 karakter hosszú karakterlánc-kifejezést adhat meg. Az alapértelmezett érték egy nulla hosszúságú karaktersorozat ("").

Ezt a tulajdonságot az objektum tulajdonságlapja, makró, illetve Visual Basic for Applications (VBA) -kód használatával adhatja meg.

Más tulajdonságoktól eltérően a Tag tulajdonság beállítása nincs hatással az objektum egy attribútumára sem.

A tulajdonság segítségével az objektumokhoz azonosító karakterláncot rendelhet az objektum más tulajdonságainak befolyásolása és egyéb nem várt hatások nélkül. A Tag tulajdonság hasznos lehet, ha ellenőriznie kell egy eljárásnak változóként átadott űrlap, jelentés, adatelérési lap, szakasz vagy vezérlőelem identitását.

Példa

Az alábbi példa a Tag tulajdonság segítségével egyéni üzenetet jelenít meg egy űrlap vezérlőivel kapcsolatban. Amikor egy vezérlőn van a fókusz, leíró szöveg jelenik meg az lblMessage nevű címke vezérlőelemben. A megjelenített üzenet szövegét úgy állíthatja be, hogy megad egy rövid karakterláncot az egyes vezérlők Tag tulajdonságához. Amikor egy vezérlőre kerül a fókusz, a kód hozzárendeli a vezérlő Tag tulajdonságának értékét a címke vezérlőelem Cím tulajdonságához. Ez a példa egy txtDescription nevű szövegmezőhöz és egy cmdButton nevű parancsgombhoz jelenít meg leíró szöveget egy űrlapon.

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