Поделиться через

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

  • Статья

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

Синтаксис

expression. Вариантов размещения

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

Замечания

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

Первый объект-член в коллекции имеет значение индекса 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 и обратная связь.