como recorrer todos los controles en una forma

Lo que pasa es que los controles dentro del TabControl,
son un sub-conjunto de esta, igual en un groupBox, y
otros controles. Son controles dentro de otro control.

Debes utilizar algun metodo recursivo como por ejemplo:

Private Sub RecorrerControles(ByVal pControl As _
Control.ControlCollection)
Dim vControl As Object ' Control o Arreglo de Controles
Dim vTipoControl as string
For Each vControl In pControl
If vControl.Controls.Count > 0 Then
'Al ser una colección se llama recursivamente
RecorrerControles(vControl.Controls)
Else
' Procesa Control
vTipoControl = TypeName(vControl) ' ComboBox,etc...

End If
Next
End Sub

Hola grupo, quisiera saber como hacer para recorrer

todos los objetos en una

forma, tengo en la forma un tabcontrol y dentro de este

todos los demas

controles, lo que quiere desarrollar es un procedimiento

que solo mandandole

por parámetro la forma, me recorra todos los controles

que hay en ella...

hice algo como

for c as control in forma.controls

next

donde forma es la forma que esto enviando por parámetro,

pero me he dado

cuenta que solo trae el tabcontrol...

alguien me puede ayudar con esto?, no todas las formas

van a tener

tabcontrols, por lo que NO podría hacer esto

for c as control in forma.control("tab")
..
next

gracias por su ayuda..


.