Trucos de Visual Basic 6.0 Limpiar todas las cajas de texto de un formulario


Podemos limpiar, o inicializar todos los campos de un formulario de visual basic 6.0 rápidamente.


Public Sub Limpiar(frmForm As Form)
Dim ctlControl As Object
On Error Resume Next
For Each ctlControl In frmForm.Controls ctlControl.Text = "" ctlControl.ListIndex = -1
DoEvents
Next ctlControl
End Sub


Dejar un comentario

Nombre:

Mail:

Web:

Comentario:

Trucos relacionados de Limpiar todas las cajas de texto de un formulario