lunes, 23 de septiembre de 2013

¿Cómo recorrer controles en Access?

Supongamos que queremos recorrer controles de una pantalla o de un control para realizar una tarea. Por ejemplo inhabilitar los controles de un determinado tipo. Esto se puede hacer con el siguiente código:

        For Each ctrl In [Form_Certificados_Editor]!Page63.Controls
            If ctrl.ControlType = acCheckBox Or ctrl.ControlType = acComboBox Or ctrl.ControlType = acTextBox Or ctrl.ControlType = acSubform Then
                ctrl.Enabled = False
            End If
        Next