Problema con paso de parámetro.

[abuitrago81]

Hola.
Estoy empezando con Visual Basic. Net 2008 y tengo una duda.
Estoy haciendo un botón limpiar para q limpie todas las cajas de texto.

Bueno en el formulario tengo la siguiente estructura:

FORM1
- PANEL_PRINCIPAL
- PANEL_CLIENTES
- TABCONTROL_CLIENTES
- TABPAGE_ALTAS

Bueno pues el boton está en el área de esa pestaña del Tabcontrol.
En ese botón le pongo:

Código vb:

Private Sub boton_limpiarAltas_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles boton_limpiarAltas.Click
        LimpiarTextbox(Me.TabControl_clientes.Name)
    End Sub
 

Y por otro lado tengo el procedimiento de borrado de cajas:

Código vb:

Private Sub LimpiarTextbox(ByVal XXXX As String)
        For Each c As Control In Me.XXXX.Controls
            If TypeOf c Is TextBox Then
                CType(c, TextBox).Clear()
            End If
        Next
    End Sub
 

Mi pregunta, es ¿ cómo hago para que el parámetro que paso se ponga donde están las XXXX?
Y para borrar las cajas de texto tendría que poner el "Name" del TabControl, del Panel dnd está ese tabControl u otra cosa ??

Muchas gracias.

[atak]

Hola, abuitrago81

Tendrias que pasar como parametro un objeto y no una cadena de texto.

Código PHP:

   
    
      Private Sub boton_limpiarAltas_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles boton_limpiarAltas.Click 
   
              LimpiarTextbox(TabControl) 
    
          End Sub  
   

Código PHP:

           Private Sub LimpiarTextbox(ByVal XXXX As object) 
 
                 For Each c As Control In Me.XXXX.Controls 
                     If TypeOf c Is TextBox Then 
                         CType(c, TextBox).Clear() 
                     End If 
                 Next 
             End Sub  
   

Prueba de esa manera ..


Saludos.