Super Urgente

"Fernando" wrote in message
news:

Tengo un problema, tengo un tabcontrol con varios textbox, lo que quiero
hacer es recorrer todos esos textbox y hacer la pregunta de que si esta
lleno
se guarde en mi base y si no no lo haga. Como puedo lograr que me agarre
la
informacion del textbox para hacer esa pregunta

Dim c as Control
For Each c in MiTabControl.Controls
If TypeOf c Is TextBox Then
Dim t as TextBox = CType(c, TextBox)
'... t.Text es el texto que buscas ...
End If
Next c

Si los textboxes no están directamente sobre el tabcontrol, sino que se
encuentran dentro de otros controles que a su vez estén dentro del
tabcontrol, entonces tendrás que modificar la rutina anterior para que
recorra recursivamente la colección Controls de cada uno de los controles.

"Fernando" escribió:

lo que quiero hacer es recorrer todos esos textbox y
hacer la pregunta de que si esta lleno se guarde en
mi base y si no no lo haga. Como puedo lograr que me agarre la
informacion del textbox para hacer esa pregunta

Hola, Fernando:

Deberás de recorrer la colección «Controls» del control tipo TabPage que
contenga los controles de texto que deseas comprobar:

Dim ctrl As Control

For Each ctrl In Me.TabPage1.Controls
If TypeOf ctrl Is TextBox Then
If ctrl.Text <> String.Empty Then
MessageBox.Show("Guardar los datos.", ctrl.Name)
Else
MessageBox.Show("No hay texto en el control.", ctrl.Name)
End If
End If
Next

Un saludo

Enrique Martínez
[MS MVP - VB]

Nota informativa: La información contenida en este mensaje, así como el
código fuente incluido en el mismo, se proporciona «COMO ESTÁ», sin
garantías de ninguna clase, y no otorga derecho alguno. Usted asume
cualquier riesgo al poner en práctica, utilizar o ejecutar lo recomendado o
sugerido en el presente mensaje.