Ver Mensaje Individual
  #12 (permalink)  
Antiguo 23/05/2005, 07:56
MaxExtreme
 
Fecha de Ingreso: abril-2005
Mensajes: 3.083
Antigüedad: 20 años
Puntos: 17
Cita:
Iniciado por Omar Vivas
'Define esta Subrutina en un Módulo
Public Sub Limpiar(ByVal Frm as Form)
dim x As Integer
for x= 0 to Frm.Controls(x).Count-1
If TypeOf Frm.Controls(x) Is TextBox then
Frm.Controls(x).Text=""
End If
Next x
End Sub

'Para Invocarla desde tu WindowsForm debes hacer:

Limpiar(Me)
'Eso es Todo... Espero que te Sirva.
Ya lo había contestado yo:

Cita:
Iniciado por MaxExtreme
Como ya respondí, se debe hacer un bucle usando Me.Controls.Count para saber el total, Me.Controls[i] para acceder a cada uno y usar .Text, comprobando que el control que toca es un TextBox.
...deja que lo implemente la persona que pregunta.