Свойство CommandButton.Properties (Access)

Возвращает ссылку на объект-коллекцию Properties элемента управления. Только для чтения.

Синтаксис

выражение. Свойства

выражение Переменная, представляющая объект CommandButton .

Примечания

Объект-коллекция свойств — это коллекция всех свойств, связанных с элементом управления. Ссылайтесь на отдельных членов семейства с помощью индекса объекта-элемента или строкового выражения, которое является именем объекта-элемента.

Первый объект-элемент в наборе имеет значение индекса, равное 0, а общее количество объектов-членов в наборе равно значению свойства Count семейства Properties, равному 1.

Пример

В следующей процедуре свойство Properties используется для печати всех свойств, связанных с элементами управления в форме, в окне отладки. Чтобы выполнить этот код, поместите в форму кнопку с именем 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

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.