limpiar cajas de texto

04/10/2005 - 01:04 por Hugo Gsell | Informe spam
Hola.. en el viejo vb6 tenia una clase que hacía lo siguiente
limpiaba los text de un formulario como ahgo para pasar estoa .net?

Public Sub LimpiaCajasText(xForm As Form)
Dim Ctrl As Control
For Each Ctrl In xForm
If TypeOf Ctrl Is TextBox Then
Ctrl.Text = "" Then
End If
Next
End Sub
 

Leer las respuestas

#1 Leonardo Azpurua [mvp vb]
04/10/2005 - 02:02 | Informe spam
"Hugo Gsell" escribió en el mensaje
news:
Hola.. en el viejo vb6 tenia una clase que hacía lo siguiente
limpiaba los text de un formulario como ahgo para pasar estoa .net?

Public Sub LimpiaCajasText(xForm As Form)
Dim Ctrl As Control
For Each Ctrl In xForm
If TypeOf Ctrl Is TextBox Then
Ctrl.Text = "" Then
End If
Next
End Sub



Hola, Hugo:

Es exactamente igual, salvo que
TypeOf Ctrl Is TextBox
puede ser reemplazado por
Ctrl.GetType.Name = "TextBox"

Ademas de que debe haber al menos tres maneras mas de hacer lo mismo.


Salud!

Preguntas similares