Recorrer cuadros de textos independientes en formulario
Necesito recorrer una serie de cuadros de textos independientes, en un formulario independiente para enl caso de que estén vacíos INHABILITARLOS en escritura, como podría hacerlo.
1 Respuesta
Respuesta de Neckkito Nck
1
Con la información que das solo puedo indicarte un código que lo que hace es recorrer los controles del formulario y, si encuentra un textbox y está vacío, lo inhabilita.
Private Sub... Dim ctl As Control For Each ctl In Me.Controls If ctl.ControlType = acTextBox Then If IsNull(ctl.Value) Then ctl.Enabled = False Else ctl.Enabled = True End If End If Next ctl End Sub
Saludos,
Neckkito ( http://bit.ly/NckAccess / http://bit.ly/ForoNkSv)
