Свойство ObjectFrame. ControlType (Access)ObjectFrame.ControlType property (Access)

Можно использовать свойство ControlType в Visual Basic, чтобы определить тип элемента управления в форме или отчете.You can use the ControlType property in Visual Basic to determine the type of control on a form or report. Байтдля чтения и записи.Read/write Byte.

СинтаксисSyntax

Expression. ControlTypeexpression.ControlType

Expression (выражение ) Переменная, представляющая объект ObjectFrame .expression A variable that represents an ObjectFrame object.

ПримечанияRemarks

Значение свойства ControlType — это встроенная константа, указывающая тип элемента управления.The ControlType property setting is an intrinsic constant that specifies the control type. Полный список элементов управления, созданных с помощью методов креатеконтрол и креатерепортконтрол , приведен в разделе Перечисление акконтролтипе .For a complete list of controls created by the CreateControl and CreateReportControl methods, see the AcControlType enumeration.

Свойство ControlType можно задать только с помощью Visual Basic в режиме конструктора формы или конструктора отчетов, но оно может быть прочитано во всех представлениях.The ControlType property can only be set by using Visual Basic in form Design view or report Design view, but it can be read in all views.

Свойство ControlType используется не только для проверки определенного типа элемента управления в коде, но и для изменения типа элемента управления на другой тип.The ControlType property is useful not only for checking for a specific control type in code, but also for changing the type of control to another type. Например, вы можете изменить текстовое поле на поле со списком, задав свойство ControlType для текстового поля равным Аккомбобокс в режиме конструктора формы.For example, you can change a text box to a combo box by setting the ControlType property for the text box to acComboBox while in form Design view.

Свойство ControlType можно использовать для изменения характеристик похожих элементов управления в форме в соответствии с определенными условиями.You can use the ControlType property to change characteristics of similar controls on a form according to certain conditions. Например, если вы не хотите, чтобы пользователи могли редактировать существующие данные в текстовых полях, можно присвоить свойству SpecialEffect всех текстовых полей значение Flat и задать для свойства AllowEdits формы значение нет.For example, if you don't want users to edit existing data in text boxes, you can set the SpecialEffect property for all text boxes to Flat and set the form's AllowEdits property to No. (Свойство SpecialEffect не влияет на возможность изменения данных; он используется здесь, чтобы обеспечить визуальную подсказку, что поведение элемента управления изменилось.)(The SpecialEffect property doesn't affect whether data can be edited; it's used here to provide a visual cue that the control behavior has changed.)

Свойство ControlType также используется для указания типа элемента управления, создаваемого при использовании метода креатеконтрол .The ControlType property is also used to specify the type of control to create when you are using the CreateControl method.

ПримерExample

В следующем примере проверяется свойство ControlType для всех элементов управления в форме.The following example examines the ControlType property for all controls on a form. Для каждого элемента управления Label и текстового поля процедура переключает свойство SpecialEffect для этих элементов управления.For each label and text box control, the procedure toggles the SpecialEffect property for those controls.

Если свойство SpecialEffect элемента управления Label имеет значение shadowd, а свойство SpecialEffect элемента управления текстовым полем имеет значение Normal, а для свойств алловаддитионс, алловделетионси AllowEdits задано значение true, intCanEdit переменная переключается для разрешения редактирования базовых данных.When the SpecialEffect property of the label control is set to Shadowed, and the SpecialEffect property of the text box control is set to Normal, and the AllowAdditions, AllowDeletions, and AllowEdits properties are all set to True, the intCanEdit variable is toggled to allow editing of the underlying data.

Sub ToggleControl(frm As Form) 
 Dim ctl As Control 
 Dim intI As Integer, intCanEdit As Integer 
 Const conTransparent = 0 
 Const conWhite = 16777215 
 For Each ctl in frm.Controls 
 With ctl 
 Select Case .ControlType 
 Case acLabel 
 If .SpecialEffect = acEffectShadow Then 
 .SpecialEffect = acEffectNormal 
 .BorderStyle = conTransparent 
 intCanEdit = True 
 Else 
 .SpecialEffect = acEffectShadow 
 intCanEdit = False 
 End If 
 Case acTextBox 
 If .SpecialEffect = acEffectNormal Then 
 .SpecialEffect = acEffectSunken 
 .BackColor = conWhite 
 Else 
 .SpecialEffect = acEffectNormal 
 .BackColor = frm.Detail.BackColor 
 End If 
 End Select 
 End With 
 Next ctl 
 If intCanEdit = IFalse Then 
 With frm 
 .AllowAdditions = False 
 .AllowDeletions = False 
 .AllowEdits = False 
 End With 
 Else 
 With frm 
 .AllowAdditions = True 
 .AllowDeletions = True 
 .AllowEdits = True 
 End With 
 End If 
End Sub

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

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи?Have questions or feedback about Office VBA or this documentation? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.