คุณสมบัติ Properties

นำไปใช้กับ

วัตถุ AccessObject	วัตถุ Control	วัตถุ Label	วัตถุ Page	วัตถุ SubForm
วัตถุ BoundObjectFrame	วัตถุ CurrentProject	วัตถุ Line	วัตถุ PageBreak	คอลเลกชัน TabControl
วัตถุ CheckBox	วัตถุ CustomControl	วัตถุ ListBox	วัตถ Rectangle	วัตถุ TextBox
วัตถุ CodeProject	วัตถุ Form	วัตถุ ObjectFrame	วัตถุ Report	วัตถุ ToggleButton
วัตถุ ComboBox	วัตถุ GroupLevel	วัตถุ OptionButton	วัตถุ Section
วัตถุ CommandButton	วัตถุ Image	วัตถุ OptionGroup	วัตถุ SmartTag

คุณสมบัติ Properties ที่นำไปใช้กับวัตถุ AccessObject, CodeProjec และ CurrentProject

ส่งกลับการอ้างอิงไปยังคอลเลกชัน AccessObjectProperties ของวัตถุ AccessObject, CurrentProject หรือ CodeProject

นิพจน์.Properties

นิพจน์ ต้องระบุ นิพจน์ที่ส่งกลับวัตถุใดวัตถุหนึ่งข้างต้น

ข้อสังเกต

วัตถุคอลเลกชัน AccessObjectProperties คือคอลเลกชันของคุณสมบัติทั้งหมดที่เกี่ยวข้องกับวัตถุ AccessObject, CurrentProject หรือ CodeProject คุณสามารถอ้างถึงสมาชิกแต่ละรายของคอลเลกชันได้โดยใช้ดัชนีของวัตถุสมาชิกหรือนิพจน์สตริงที่เป็นชื่อของวัตถุสมาชิก วัตถุสมาชิกแรกในคอลเลกชันมีค่าดัชนีเป็น 0 และจํานวนรวมของวัตถุสมาชิกในคอลเลกชันคือค่าของคุณสมบัติ Count ของคอลเลกชัน AccessObjectProperties ลบด้วย 1

คุณไม่สามารถใช้คุณสมบัติ Properties เพื่อส่งกลับคุณสมบัติจากวัตถุ AccessObject ที่เป็นสมาชิกของคอลเลกชันซึ่งถูกเข้าถึงจากวัตถุ CurrentData ได้

คุณสมบัติ Properties ที่นำไปใช้กับวัตถุ SmartTag

ส่งกลับคอลเลกชัน SmartTagProperties ที่แสดงคอลเลกชันของคุณสมบัติสำหรับสมาร์ทแท็กที่เฉพาะเจาะจง

นิพจน์.Properties()

นิพจน์ ต้องระบุ นิพจน์ที่ส่งกลับวัตถุ SmartTag

คุณสมบัติ Properties เมื่อนําไปใช้กับวัตถุอื่นๆ ทั้งหมดในรายการ นําไปใช้กับ

ส่งกลับการอ้างอิงไปยังวัตถุคอลเลกชัน Properties ของตัวควบคุม

นิพจน์.Properties

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

ข้อสังเกต

วัตถุคอลเลกชัน Properties คือคอลเลกชันของคุณสมบัติทั้งหมดที่เกี่ยวข้องกับตัวควบคุม คุณสามารถอ้างถึงสมาชิกแต่ละรายของคอลเลกชันได้โดยใช้ดัชนีของวัตถุสมาชิกหรือนิพจน์สตริงที่เป็นชื่อของวัตถุสมาชิก วัตถุสมาชิกแรกในคอลเลกชันมีค่าดัชนีเป็น 0 และจํานวนรวมของวัตถุสมาชิกในคอลเลกชันคือค่าของคุณสมบัติ Count ของคอลเลกชัน Properties ลบด้วย 1

ตัวอย่าง

กระบวนงานต่อไปนี้ใช้คุณสมบัติ Properties ในการพิมพ์คุณสมบัติทั้งหมดที่เกี่ยวข้องกับตัวควบคุมบนฟอร์มไปยังหน้าต่าง Debug เมื่อต้องการเรียกใช้โค้ดนี้ ให้วางปุ่มคําสั่งที่ชื่อ cmdListProperties บนฟอร์ม และวางโค้ดต่อไปนี้ลงในส่วนการประกาศของฟอร์ม คลิกปุ่มคําสั่งเพื่อพิมพ์รายการคุณสมบัติในหน้าต่างแก้จุดบกพร่อง

Private Sub cmdListProperties_Click()
    ListControlProps Me
End Sub
Public Sub ListControlProps(ByRef frm As Form)
    Dim ctl As Control
    Dim prp As Property
    On Error GoTo props_err
    For Each ctl In frm.Controls
        Debug.Print ctl.Properties("Name")
        For Each prp In ctl.Properties
            Debug.Print vbTab & prp.Name & _
                " = " & prp.Value
        Next prp
    Next ctl
props_exit:
    Set ctl = Nothing
    Set prp = Nothing
Exit Sub
props_err:
    If Err = 2187 Then
        Debug.Print vbTab & prp.Name & _
            " = Only available at design time."
        Resume Next
    Else
        Debug.Print vbTab & prp.Name & _
            " = Error Occurred: " & Err.Description
        Resume Next
    End If
End Sub