如何遍历form中的所有控件？？

Question

form中有控件text1,text2,text3,combo1,combo2,line1,line2,frame1,frame2,image1,image2………
有没有什么方法可以遍历所有控件？
for …………
     控件 i
next

Answer 1

顺便问一下 ，如果不看控件的名称，如何判断这个空间是text、combo还是frame控件？？

Answer 2

for each v in me.controls
next

Answer 3

//顺便问一下 ，如果不看控件的名称，如何判断这个空间是text、combo还是frame控件？？for each v in me.controls
    if typeof v is TextBox then
         ……
    End if
next

Answer 4

TypeOf objectname Is objecttype 形式的表达式。其中的 objectname 是任何对象的引用，而 objecttype 则是任何有效的对象类型。如果 objectname 是 objecttype 所指定的一种对象类型，则表达式为 True，否则为False。

Answer 5

也可定义为Control（控件）
Control是VB所有控件的基类Dim Ctl As ControlFor Each Ctl In Me.Controls
    Debug.Print Ctl.Name & "(" & TypeName(Ctl) & ")"
Next Ctl