遍历窗体上所有的控件（包括在该窗体上的容器内的控件）的问题

Question

请问想实现如下功能：遍历窗体上所有的控件（包括在该窗体上的容器内的控件），控件name各不相同。如果该控件是我想要的类型则执行一段代码，请问该怎么做？我用controls.oftype不能获取容器内的控件，controls.find只能找到指定名称的控件。

Answer 1

您好，可以通过用Controls写一个递归方法来获取所有的控件。

Answer 2

你好！
     可以使用递规的方式来遍历，使用的时候把form1.Controls作为参数传递给这个方法：

1. Private Sub AccessControls(ByVal ctc As Control.ControlCollection)
2.     For Each c As Control In ctc
3.         '这里可以按自己的要求使用c
4.        
5.         If c.HasChildren Then
6.             AccessControls(c.Controls)
7.         End If
8.     Next
9. End Sub

---

周雪峰

Answer 3

谢谢了！

Answer 4

不客气啊！

---

周雪峰