ينطبق على
Access لـ Microsoft 365 Access 2024 Access 2021 Access 2019 Access 2016

ينطبق على

عنصر BoundObjectFrame

عنصر Image

عنصر OptionGroup

عنصر SubForm

عنصر CheckBox

عنصر Label

عنصر Page

مجموعة TabControl

عنصر ComboBox

عنصر Line

عنصر PageBreak

عنصر TextBox

عنصر CommandButton

عنصر ListBox

عنصر Rectangle

عنصر ToggleButton

عنصر CustomControl

عنصر ObjectFrame

عنصر Report

عنصر Form

عنصر OptionButton

عنصر Section

يخزن معلومات إضافية حول نموذج أو تقرير أو صفحة الوصول إلى البيانات أو مقطع أو عنصر تحكم التي يحتاجها تطبيق Access. السلسلة مقروءة/مكتوبة.

expression.Tag

expression Required. هو تعبير يقوم بإرجاع أحد العناصر الموجودة في القائمة "ينطبق على".

ملاحظات

يمكنك إدخال تعبير السلسلة بطول 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

هل تحتاج إلى مزيد من المساعدة؟

الخروج من الخيارات إضافية؟

استكشف مزايا الاشتراك، واستعرض الدورات التدريبية، وتعرف على كيفية تأمين جهازك، والمزيد.