limpar textbox no vb.net

[xeon 0]

   Private Sub limpar(ByVal form as Form)        Dim i As Integer        For i = 0 To (form.Controls.Count - 1)            If TypeOf form.Controls(i) Is System.Windows.Forms.TextBox Then                form.Controls(i).Text = ""            End If        Next i    End Sub

pq que isto não funciona?

[rOcKLoCo 0]

tente passar ao invés de ByVal por ByRefAtt,Carlos

[xeon 0]

ainda não deu...será que tem algo haver se eu estiver usando uma tabControl?

[rOcKLoCo 0]

pode ser, você teria q procurar dentro do TabControl...entendeu?Att.Carlos

[xeon 0]

entendi...mas dae eu procuraria dentro da pagina da tab control neh!?

[rOcKLoCo 0]

não, dentro do CONTROLE TabControl...

[Cesar E. Fassura 0]

 

Private Sub limpar(ByVal form as Form)		   Dim i As Integer		   For i = 0 To (form.Controls.Count - 1)			   If TypeOf form.Controls(i) Is System.Windows.Forms.TextBox Then				   form.Controls(i).Text = ""			   End If		   Next i	   End Sub

pq que isto não funciona?

 

 

 

 

Comigo Funcionou no VB.NET 2008 Express este código.

 

 

CODE

 

 

Private Sub LimpaTexto()

Dim QQCoisa As Control

For Each QQCoisa In Me.Controls

If TypeOf QQCoisa Is TextBox Then

QQCoisa.Text = ""

End If

Next

End Sub

 

Espero que tenha Ajudado..

 

:thumbsup: