Vaciar textbox y checkbox
Hola, tengo un modulo que me permite vaciar solo texto pero ahora tengo vaciar textbox y checkbox al tiempo como lo hago por medio de un modulo o como lo podría el modulo que estoy utilizando para vaciartexto es el siguiente:
Public Function VaciarTextBox(frmx As Form)
Dim ctrl As Integer
For ctrl = 0 To (frmx.Controls.Count - 1)
Set controlsel = frmx.Controls(ctrl)
If TypeOf controlsel Is TextBox Then
controlsel.Text = ""
End If
Next ctrl
End Function
Public Function VaciarTextBox(frmx As Form)
Dim ctrl As Integer
For ctrl = 0 To (frmx.Controls.Count - 1)
Set controlsel = frmx.Controls(ctrl)
If TypeOf controlsel Is TextBox Then
controlsel.Text = ""
End If
Next ctrl
End Function
3 respuestas
Respuesta de intman
1
Respuesta de giorgiog
1
Respuesta de alexanderk
1