Panel de Controles

[dorb]

Necesito limpiar los cuadros de texto que tengo dentro de un panel esto lo he intentado hacer con el sig. codigo.

For indice = 0 To Panel1.Controls.Count - 1
If Panel1.Controls(indice).GetType Is GetType(TextBox) Then
CType(Panel1.Controls(indice), TextBox).Enabled = False
CType(Panel1.Controls(indice), TextBox).Text = ""
End If
Next

pero cundo le inserto otros valores a los cuadros de texto sigue mostrando los valores de la ultima consulta que realice.
Mi pregunta es si existe una manera mas efectiva de borrar el contenido de dichos cuadros; recordando que todo estos cuadros de texto estan dentro de un panel.

Por favor ayudenme ya llevo un buende tiempo batallando con este problema.
de antemano muchas gracias.

[RootK]

Esto te servirá:

For Each c As Control In Panel1.Controls
If c.GetType.Name.ToLower = "textbox" Then
CType(c, TextBox).Enabled = false
CType(c, TextBox).Text = ""
End If
Next

Salu2

[dorb]

te voy a tratar de explicar mas calro mi problema mira tehgon un boton de nuevo con el el cual limpio mis cuadros de texto a traves de este codigo

For Each c As Control In Panel1.Controls
If c.GetType.Name.ToLower = "textbox" Then
CType(c, TextBox).Enabled = false
CType(c, TextBox).Text = ""
End If
Next

y se supone que los limpia y luego tecleo los nuevos valores que quiero añadir a mi base, ya que termino de llenar todos los cuadros de texto le doy a un boton que se llama agregar ;dentro d e ese boton te el sig. codigo para obtener los valores que tienen los cuadros actualmente(osea los que acabo de teclear) y los meto en un vector

For x = 0 To Panel1.Controls.Count - 1
If Panel1.Controls(x).GetType Is GetType(TextBox) Then
datos(xx) = CType(Panel1.Controls(x), TextBox).Text
xx = xx + 1
End If
Next

pero resulta que que no trae los valores que acabo de teclear si no los ultimos valores que tenia antes de que le diera al boton nuevo, como si nunca los hubiera limpiado.

no se si tengas otra forma de hacerlo. ojala y entiendas lo qeu trato de decirte
de3 antemano gracias.

[Foskiton]

Joer, pues para mi que el codigo lo tienes bien, revisa el codigo mira por donde pasa cuando le das al boton, quizas sea que el array lo tienes lleno de los datos anteriores o algo asi, no se, El codigo lo tienes bien. Eche unha historia esto de programar. Si asi no te funciona, te toca JOd... y cojerlos uno a uno, eso es prueba uno a uno o con un par de los textbox, a ver si tienen el primer o segundo valor cuando le das al boton, pero hazlo poniendo solo: msgBox(textbox1.text) para ver el valor(debería de ser el 2º valor) si es el 2º el problema esta en los for o vete tu a saber

Ya me diras que tal. suerte