Atribuut Tag (Silt)

Rakenduskoht

Objekt BoundObjectFrame

Objekt Image

Objekt OptionGroup

Objekt SubForm

Objekt CheckBox

Objekt Label

Objekt Page

Kogum 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 Selection

Talletab lisateavet Microsoft Office Access 2007 rakenduse jaoks nõutava vormi, aruande, andmepääsulehe, jaotise või juhtelemendi kohta. Lugemis-/kirjutamisõigusega String.

avaldis.Tag

avaldis Nõutav. Avaldis, mis tagastab loendi Rakenduskoht objekti.

Kommentaarid

Saate sisestada kuni 2048 tähemärki pika stringavaldise. Väikesäte on nullpikkusega string (" ").

Selle atribuudi saate määrata, kasutades objekti atribuudilehte, makrot või Visual Basic for Applications (VBA) koodi.

Erinevalt teistest atribuutidest ei mõjuta atribuudi Tag (Silt) säte ühtki objektiatribuuti.

Seda atribuuti saate kasutada objektile identimisstringi määramisel, mõjutamata objekti muude atribuutide sätteid ja põhjustamata muid kõrvalmõjusid. Atribuut Tag (Silt) on kasulik, kui peate kontrollima protseduuri muutujana esitatud vormi, aruande, andmepääsulehe, jaotise või juhtelemendi identiteeti.

Näide

Järgmises näiteks kasutatakse atribuuti Tag (Silt) vormi juhtelementide kohandatud sõnumite kuvamiseks. Kui fookuses on juhtelement, kuvatakse kirjeldav tekst sildi juhtelemendil lblMessage. Sõnumi teksti saate määrata seades kõigi juhtelementide atribuut Tag (Silt) lühikesele tekstistringile. Kui juhtelement satub fookusesse määratakse selle atribuut Tag (Silt) sildi juhtelemendi atribuudile Caption (Pealdis). Selles näites kuvatakse tekstivälja txtDescription kirjeldav tekst ja vormil olev käsunupp 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
Täiendage oma oskusi
Tutvuge koolitusmaterjalidega
Kasutage uusi funktsioone enne teisi
Liituge Office Insideri programmiga

Kas sellest teabest oli abi?

Täname tagasiside eest!

Täname tagasiside eest! Tundub, et võiksime teid kokku viia ühega meie Office'i tugiagentidest, kes aitab teil probleemi lahendada.

×