คุณสมบัติ 'แท็ก' (Tag)

ใช้กับ

วัตถุ BoundObjectFrame

วัตถุ Image

วัตถุ OptionGroup

วัตถุ SubForm

วัตถุ CheckBox

วัตถุ Label

วัตถุ Page

คอลเลกชัน TabControl

วัตถุ ComboBox

วัตถุ Line

วัตถุ PageBreak

วัตถุ TextBox

วัตถุ CommandButton

วัตถุ ListBox

วัตถ Rectangle

วัตถุ ToggleButton

วัตถุ CustomControl

วัตถุ ObjectFrame

วัตถุ Report

วัตถุ Form

วัตถุ OptionButton

วัตถุ Section

เก็บข้อมูลเพิ่มเติมเกี่ยวกับ ฟอร์ม, รายงาน, Data Access Page, ส่วน, หรือ ตัวควบคุม ที่จำเป็นต้องมีโดยแอปพลิเคชัน Microsoft Office Access 2007 อ่าน/เขียน สตริง

นิพจน์.Tag

จำเป็นต้องมี นิพจน์ นิพจน์ที่ส่งกลับวัตถุใดวัตถุหนึ่งในรายการ ใช้กับ

ข้อสังเกต

คุณสามารถใส่ นิพจน์สตริง ได้สูงสุด 2048 อักขระ ค่าเริ่มต้นคือ สตริงความยาวเป็นศูนย์ (" ")

คุณสามารถตั้งค่าคุณสมบัตินี้ได้โดยใช้ แผ่นคุณสมบัติ ของวัตถุ แมโคร หรือโค้ด Visual Basic for Applications (VBA)

การตั้งค่าคุณสมบัติ Tag ไม่มีผลต่อแอตทริบิวต์ใดๆ ของวัตถุ ไม่เหมือนกับคุณสมบัติอื่น

คุณสามารถใช้คุณสมบัตินี้เพื่อกำหนดสตริงการระบุให้วัตถุได้โดยไม่มีผลต่อการตั้งค่าคุณสมบัติอื่นหรือทำให้เกิดผลข้างเคียงใดๆ คุณสมบัติ Tag มีประโยชน์เมื่อคุณจำเป็นต้องตรวจสอบข้อมูลประจำตัวของฟอร์ม รายงาน หน้าการเข้าถึงข้อมูล ส่วน หรือตัวควบคุมที่สามารถเป็นตัวแปรในกระบวนงานได้

ตัวอย่าง

ตัวอย่างต่อไปนี้ใช้คุณสมบัติ Tag เพื่อแสดงข้อความแบบกำหนดเองเกี่ยวกับตัวควบคุมบนฟอร์ม เมื่อตัวควบคุมมีโฟกัส ข้อความอธิบายจะแสดงขึ้นมาในตัวควบคุมป้ายชื่อที่เรียกว่า lblMessage คุณระบุข้อความสำหรับข้อความโดยการตั้งค่าคุณสมบัติ Tag สำหรับแต่ละตัวควบคุมให้เป็นสตริงข้อความสั้น เมื่อตัวควบคุมได้รับโฟกัส คุณสมบัติ Tag ของตัวควบคุมจะถูกกำหนดไปยังคุณสมบัติ Caption ของตัวควบคุมป้ายชื่อ ตัวอย่างนี้แสดงข้อความอธิบายสำหรับกล่องข้อความที่ชื่อว่า txtDescription และปุ่มคำสั่งที่ชื่อว่า 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
ขยายทักษะของคุณ
สำรวจการฝึกอบรม
รับฟีเจอร์ใหม่ก่อนใคร
เข้าร่วม Office Insider

ข้อมูลนี้เป็นประโยชน์หรือไม่

ขอบคุณสำหรับคำติชมของคุณ!

ขอขอบคุณสำหรับคำติชมของคุณ! เราคิดว่าอาจเป็นประโยชน์ที่จะให้คุณได้ติดต่อกับหนึ่งในตัวแทนฝ่ายสนับสนุน Office ของเรา

×