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


Свойство Report.DefaultControl (Access)

Свойство DefaultControl возвращает объект Control, с помощью которого можно задать свойства по умолчанию для определенного типа элемента управления в конкретном отчете. Только для чтения.

Синтаксис

expression. DefaultControl (ControlType)

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

Параметры

Имя Обязательный или необязательный Тип данных Описание
ControlType Обязательный Long Константой AcControlType , указывающей тип элемента управления, для которого должны быть заданы параметры свойств по умолчанию.

Замечания

Свойство DefaultControl позволяет задать свойства элемента управления по умолчанию из кода. После задания свойств по умолчанию для определенного типа элемента управления каждый созданный элемент управления этого типа будет иметь одинаковые значения по умолчанию.

Например, если задать для свойства FontSize кнопки команды по умолчанию значение 12, каждая новая кнопка команды будет иметь размер шрифта 12 пунктов.

Не все свойства элемента управления доступны в качестве свойств по умолчанию. Свойства по умолчанию, доступные для элемента управления, зависят от типа элемента управления.

Свойство DefaultControl возвращает объект Control типа, заданного аргументом ControlType . Этот объект Control представляет не фактический элемент управления в форме, а скорее элемент управления по умолчанию, который является шаблоном для всех впоследствии созданных элементов управления этого типа. Свойства элемента управления по умолчанию для объекта Control , возвращаемого свойством DefaultControl , задаются так же, как свойства для отдельного элемента управления в форме.

Свойство DefaultControl можно использовать только в режиме конструктора или в представлении конструктора отчета. Если попытаться применить это свойство к форме или отчету, которые отсутствуют в режиме конструктора, произойдет ошибка во время выполнения.

Если попытаться задать свойство, которое не может быть задано в качестве свойства по умолчанию с помощью свойства DefaultControl , произойдет ошибка во время выполнения. Чтобы определить, какие свойства могут быть свойствами по умолчанию, выведите список коллекции Properties объекта Control , возвращаемого свойством DefaultControl .

Пример

В следующем примере создается новая форма и используется свойство DefaultControl для возврата объекта Control , представляющего кнопку команды по умолчанию. Процедура задает некоторые свойства по умолчанию для кнопки, а затем создает новую кнопку команды в форме.

Sub SetDefaultProperties() 
 Dim frm As Form, ctlDefault As Control, ctlNew As Control 
 
 ' Create new form. 
 Set frm = CreateForm 
 ' Return Control object representing default command button. 
 Set ctlDefault = frm.DefaultControl(acCommandButton) 
 ' Set some default properties. 
 With ctlDefault 
 .FontWeight = 700 
 .FontSize = 12 
 .Width = 3000 
 .Height = 1000 
 End With 
 ' Create new command button. 
 Set ctlNew = CreateControl(frm.Name, acCommandButton, , , , 500, 500) 
 ' Set control's caption. 
 ctlNew.caption = "New Command Button" 
 ' Restore form. 
 DoCmd.Restore 
End Sub

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

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