Compartir a través de


Propiedad Label.ControlType (Access)

Use la propiedad ControlType en Visual Basic para determinar el tipo de control en un formulario o informe. Byte de lectura y escritura.

Sintaxis

expresión. Controltype

Expresión Variable que representa un objeto Label .

Comentarios

El valor de la propiedad ControlType es una constante intrínseca que especifica el tipo de control. Para obtener una lista completa de los controles creados por los métodos CreateControl y CreateReportControl , vea la enumeración AcControlType .

[!NOTA] La propiedad ControlType sólo se puede establecer mediante el uso de Visual Basic en la vista Diseño del formulario o la vista Diseño del informe, pero se puede leer en todas las vistas.

La propiedad ControlType es solamente útil para comprobar un tipo de control de código, sino también para cambiar el tipo de control a otro tipo. Por ejemplo, puede cambiar un cuadro de texto a un cuadro combinado estableciendo la propiedad ControlType del cuadro de texto a acComboBox se encuentra en la vista Diseño del formulario.

Utilice la propiedad ControlType para cambiar las características de controles similares en un formulario según ciertas condiciones. Por ejemplo, si no desea que los usuarios editen los datos existentes en los cuadros de texto, puede establecer la propiedad SpecialEffect de todos los cuadros de texto en Sin relieve y la propiedad AllowEdits en no. (la propiedad SpecialEffect no afecta a si se pueden editar datos; se utiliza aquí para proporcionar una indicación visual que ha cambiado el comportamiento del control).

La propiedad ControlType también se usa para especificar el tipo de control que se va a crear cuando se usa el método CreateControl .

Ejemplo:

En el siguiente ejemplo se examina la propiedad ControlType para todos los controles de un formulario. Para cada control de cuadro de texto y etiqueta, el procedimiento alterna la propiedad SpecialEffect para esos controles.

Cuando la propiedad SpecialEffect del control de etiqueta se establece en Shadowed y la propiedad SpecialEffect del control de cuadro de texto se establece en Normal y las propiedades AllowAdditions, AllowDeletions y AllowEdits se establecen en True, la intCanEdit variable se alterna para permitir la edición de los datos subyacentes.

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

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.