Applies ToMicrosoft 365용 Access Access 2021 Access 2019 Access 2016

적용 대상

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, CodeProject 및 CurrentProject 개체에 적용되는 경우.

AccessObject, CurrentProject 또는 CodeProject 개체의 AccessObjectProperties 컬렉션에 대한 참조를 반환합니다.

expression.Properties

필수 요소입니다. 위의 개체 중 하나를 반환하는 식입니다.

주의

AccessObjectProperties 컬렉션 개체는 AccessObject, CurrentProject 또는 CodeProject 개체에 관련된 모든 속성의 컬렉션입니다. 멤버 개체의 인덱스 또는 멤버 개체의 이름인 문자열 식을 사용하여 컬렉션의 개별 멤버를 참조할 수 있습니다. 컬렉션의 첫 번째 멤버 개체는 인덱스 값이 0이고 컬렉션에 있는 총 멤버 개체 수는 AccessObjectProperties 컬렉션의 Count 속성에서 1을 뺀 값입니다.

CurrentData 개체에서 액세스한 컬렉션의 멤버인 AccessObject 개체에서 속성을 반환하는 데는 Properties 속성을 사용할 수 없습니다.

Properties 속성이 SmartTag 개체에 적용되는 경우.

특정 스마트 태그에 대한 속성 컬렉션을 나타내는 SmartTagProperties 컬렉션을 반환합니다.

expression.Properties()

필수 요소입니다. SmartTag 개체를 반환하는 식입니다.

Properties 속성이 적용 대상 목록의 모든 다른 개체에 적용되는 경우.

컨트롤의 Properties 컬렉션 개체에 대한 참조를 반환합니다.

expression.Properties

필수 요소입니다. 적용 대상 목록에 있는 개체 중 하나를 반환하는 식입니다.

주의

Properties 컬렉션 개체는 컨트롤에 관련된 모든 속성의 컬렉션입니다. 멤버 개체의 인덱스 또는 멤버 개체의 이름인 문자열 식을 사용하여 컬렉션의 개별 멤버를 참조할 수 있습니다. 컬렉션의 첫 번째 멤버 개체는 인덱스 값이 0이고 컬렉션에 있는 총 멤버 개체 수는 Properties 컬렉션의 Count 속성에서 1을 뺀 값입니다.

다음 프로시저에서는 Properties 속성을 사용하여 폼의 컨트롤과 연결된 모든 속성을 디버그 창에 인쇄합니다. 이 코드를 실행하려면 폼에 cmdListProperties라는 명령 단추를 배치하고 폼의 Declarations 섹션에 다음 코드를 붙여넣습니다. 명령 단추를 클릭하여 디버그 창에서 속성 목록을 인쇄합니다.

Private Sub cmdListProperties_Click()    ListControlProps MeEnd SubPublic 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 ctlprops_exit:    Set ctl = Nothing    Set prp = NothingExit Subprops_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 IfEnd Sub

도움이 더 필요하세요?

더 많은 옵션을 원하세요?

구독 혜택을 살펴보고, 교육 과정을 찾아보고, 디바이스를 보호하는 방법 등을 알아봅니다.