Properties tulajdonság

Érvényesség

A Properties tulajdonság jellemzői az AccessObject, a CodeProject és a CurrentProject objektum esetében

Visszaadja egy AccessObject, CurrentProject vagy CodeProject objektum AccessObjectProperties gyűjteményének hivatkozását.

kifejezés.Properties

Kifejezés Megadása kötelező. Egy kifejezés, amely a fenti objektumok egyikét adja vissza.

Megjegyzések

Az AccessObjectProperties gyűjteményobjektum az AccessObject, CurrentProject vagy CodeProject objektumhoz tartozó összes tulajdonság gyűjteménye. A gyűjteményben lévő egyes tagokra a tagobjektum indexével vagy a tagobjektum nevét tartalmazó karakterlánc-kifejezés használatával hivatkozhat. A gyűjtemény első tagobjektumának indexe 0, a gyűjteményben lévő tagok száma pedig az AccessObjectProperties gyűjtemény Count tulajdonsága mínusz 1.

A Properties tulajdonsággal nem tud tulajdonságokat visszaadatni olyan AccessObject objektumból, amely egy CurrentData objektumból elért gyűjtemény tagja.

A Properties tulajdonság jellemzői a SmartTag objektum esetében

Visszaad egy SmartTagProperties gyűjteményt, mely egy adott intelligens címke tulajdonságainak gyűjteménye.

kifejezés.Properties()

Kifejezés Megadása kötelező. Egy Kifejezés, amely egy SmartTag-objektumot ad vissza.

A Properties tulajdonság jellemzői az Érvényesség listában szereplő minden más objektum esetében

Visszaadja egy vezérlő Properties gyűjteményobjektumának hivatkozását.

kifejezés.Properties

Kifejezés Megadása kötelező. Egy kifejezés, amely a Hatókör listában szereplő objektumok egyikét adja vissza.

Megjegyzések

A Properties gyűjteményobjektum a vezérlőhöz tartozó összes tulajdonság gyűjteménye. A gyűjteményben lévő egyes tagokra a tagobjektum indexével vagy a tagobjektum nevét tartalmazó karakterlánc-kifejezés használatával hivatkozhat. A gyűjtemény első tagobjektumának indexe 0, a gyűjteményben lévő tagok száma pedig a Properties gyűjtemény Count tulajdonsága mínusz 1.

Példa

Az alábbi eljárás a Properties tulajdonság használatával kiírja a vezérlőkhöz tartozó összes tulajdonságot egy űrlap Hibakeresés ablakába. A kód futtatásához helyezzen el egy „cmdListProperties” nevű parancsgombot egy űrlapon, és másolja az alábbi kódot az űrlap deklarációs szakaszába. A parancsgombra kattintva a kód kiírja a tulajdonságok listáját a Hibakeresés ablakba.

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