Table of contents
TOC
Recolher sumário
Expandir sumário

Propriedade Rectangle.ControlType (Access)Rectangle.ControlType Property (Access)

office 365 dev account|Última Atualização: 22/03/2018
|
2 Colaboradores

Você pode usar a propriedade ControlType no Visual Basic para determinar o tipo de um controle em um formulário ou relatório. Bytesde leitura/gravação.You can use the ControlType property in Visual Basic to determine the type of a control on a form or report. Read/write Byte.

SintaxeSyntax

expressão. ControlTypeexpression. ControlType

expressão Uma variável que representa um objeto Rectangle .expression A variable that represents a Rectangle object.

ComentáriosRemarks

A configuração da propriedade ControlType é uma constante intrínseca que especifica o tipo de controle.The ControlType property setting is an intrinsic constant that specifies the control type.

ConstanteConstantControleControl
acBoundObjectFrameacBoundObjectFrameQuadro de objeto acopladoBound object frame
acCheckBoxacCheckBoxCaixa de seleçãoCheck box
acComboBoxacComboBoxCaixa de combinaçãoCombo box
acCommandButtonacCommandButtonBotão de comandoCommand button
acCustomControlacCustomControlControle ActiveX (personalizado)ActiveX (custom) control
acImageacImageImagemImage
acLabelacLabelRótuloLabel
acLineacLineLinhaLine
acListBoxacListBoxCaixa de listagemList box
acObjectFrameacObjectFrameQuadro de objeto desvinculadoou gráficoUnbound object frameor Chart
acOptionButtonacOptionButtonBotão de opçãoOption button
acOptionGroupacOptionGroupGrupo de opçãoOption group
acPageacPagePáginaPage
acPageBreakacPageBreakQuebra de páginaPage break
acRectangleacRectangleRetânguloRectangle
acSubformacSubformSubformulário/sub-relatórioSubform/subreport
acTabCtlacTabCtlTabTab
acTextBoxacTextBoxCaixa de textoText box
acToggleButtonacToggleButtonBotão de alternânciaBotão de alternânciaToggle buttonToggle button

Observação A propriedade ControlType só pode ser definida usando o Visual Basic no modo de Design do formulário ou no modo Design do relatório, mas ela pode ser lida em todos os modos.Note 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.

A propriedade ControlType é útil não somente para verificação para um tipo de controle específico no código, mas também para alterar o tipo de controle para outro tipo. Por exemplo, você pode alterar uma caixa de texto para uma caixa de combinação, definindo a propriedade ControlType da caixa de texto como acComboBox enquanto estiver no modo Design do formulário.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. 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.

Você pode usar a propriedade ControlType para alterar as características de controles similares em um formulário de acordo com certas condições. Por exemplo, se você não desejar que os usuários editem dados existentes em caixas de texto, você pode definir a propriedade SpecialEffect para todas as caixas de texto como plano e propriedade do formulário PermitirEdições como não. (a propriedade SpecialEffect não afeta se dados podem ser editados; ele é usado aqui para fornecer uma indicação visual que o comportamento do controle foi alterada.)You can use the ControlType property to change characteristics of similar controls on a form according to certain conditions. 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. (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.)

A propriedade ControlType também é usada para especificar o tipo de controle a ser criado quando você estiver usando o método CreateControl .The ControlType property is also used to specify the type of control to create when you are using the CreateControl method.

ExemploExample

O exemplo a seguir examina a propriedade ControlType para todos os controles em um formulário. Para cada controle de caixa de texto do rótulo e do, o procedimento alterna a propriedade SpecialEffect para esses controles. Quando a propriedade SpecialEffect dos controles do rótulo é definida como sombreado e caixa de texto a propriedade SpecialEffect dos controles é definida como Normal e o PermitirAdições, PermitirExclusõese PermitirEdições propriedades estão todos Defina como True, o intCanEdit variável é alternada para permitir a edição dos dados subjacentes.The following example examines the ControlType property for all controls on a form. For each label and text box control, the procedure toggles the SpecialEffect property for those controls. When the label controls' SpecialEffect property is set to Shadowed and the text box controls' SpecialEffect property 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

Ver tambémSee also

ConceitosConcepts

Objeto RectangleRectangle Object

© 2018 Microsoft