Tunniste-ominaisuus

Koskee seuraavia

Sisältää lisätietoja seuraavista: lomake, raportti, tietokantasivu, osa tai ohjain, joita Microsoft Office Access 2007 -sovellus tarvitsee. Merkkijono, jolla on luku-/kirjoitusoikeudet.

lauseke.Tunniste

lauseke Pakollinen. Lauseke, joka palauttaa jonkin Koskee seuraavia -luettelon objekteista.

Huomautuksia

Kirjoita merkkijonolauseke, joka on enintään 2 048 merkkiä pitkä. Oletusasetus on tyhjä merkkijono (” ”).

Voit määrittää tämän ominaisuuden objektin ominaisuusikkunan, makron tai Visual Basic for Applications (VBA) -koodin avulla.

Toisin kuin muissa ominaisuuksissa Tunniste-ominaisuusasetus ei vaikuta objektin määritteisiin.

Voit määrittää objektin tunnistetietomerkkijonon tämän ominaisuuden avulla, ilman että se vaikuttaa muihin ominaisuusasetuksiin tai aiheuttaa muita sivuvaikutuksia. Tunniste-ominaisuus on hyödyllinen, kun halutaan tunnistaa lomake, raportti, tietokantasivu, osa tai ohjausobjekti, joka välitetään muuttujana toimintosarjaan.

Esimerkki

Seuraavassa esimerkissä Tunniste-ominaisuutta käytetään lomakkeen ohjausobjekteja koskevien mukautettujen viestien näyttämiseen. Kun kohdistus on ohjausobjektissa, lblMessage-nimisessä otsikko-ohjausobjektissa näkyy kuvaava teksti. Voit määrittää viestin tekstin asettamalla kunkin ohjausobjektin Tunniste-ominaisuudeksi lyhyen tekstimerkkijonon. Kun kohdistus on ohjausobjektissa, sen Tunniste-ominaisuus määritetään otsikko-ohjausobjektin Otsikko-ominaisuudeksi. Tässä esimerkissä näytetään txtDescription-nimisen tekstiruudun ja cmdButton-nimisen komentopainikkeen kuvaava teksti lomakkeessa.

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