Ver Mensaje Individual
  #1 (permalink)  
Antiguo 16/02/2011, 02:24
yvancho
 
Fecha de Ingreso: febrero-2011
Mensajes: 4
Antigüedad: 13 años, 9 meses
Puntos: 0
Pregunta Limpiar TextBoxes. Como mejorarlo?

Hola amigos.

Programe un boton q limpie los textboxes del form de una manera rapida, pero desearia implementarla y mejorarla. Se me ocurre lo sgte.: Que por cada TextBox q encuentre en el Form, lo limpie. Lo malo es q no encuentro la manera de hacerlo. ¿como evaluar si lo q encuentra en el Form es un TextBox? y de esa manera, cada q encuentre uno, lo limpie. Por ahi va mi problema.

La manera actual que lo hago es con el codigo sgte:
  1. En la clase Utiles, tengo el método al cual se va a llamar para limpiar los TextBoxes, ingresando como parametro el TextBox que se quiera limpiar.

    Código:
    Public Class Utiles
         Public Sub limpiar(ByVal caja As TextBox)
            caja.Text = ""
         End Sub
    End Class
    
  2. En la programacion del Form, kreo una inastancia global de la clase Utiles, y nombro al objeto como 'usar'

    Código:
    Dim usar As New Utiles
    
  3. Y por ultimo manualmente le mando tooodooos los txt habidos y por haber.

Código:
Private Sub btnLimpiar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnLimpiar.Click

        usar.limpiar(txtEC01)
        usar.limpiar(txtEC02)
        usar.limpiar(txtEC03)
        usar.limpiar(txtEC04)
        usar.limpiar(txtExParcial)
        usar.limpiar(txtExFinal)
        usar.limpiar(txtNotaAct)
        usar.limpiar(txtPromFinal)

    End Sub
Justo esta ultima parte es la que quisiera mejorar, porque imaginense q tuvieramos como 20 o exagerando mas de 50 TextBox. No seria demasiado trabajoso limpiar todos de esta manera?

Gracias por su tiempo, y esperando pronta respuesta

Atte.

Yvancho