主题：获取窗口中控件

 For Each c As WinForm.Control In Forms("窗口1").Controls

        If Typeof c Is WinForm.Button Then '判断控件是否是文本框

            Dim an As WinForm.Button = c

            If c.Name IsNot Nothing Then

                an_Name=an_Name & c.Name  & "|"

            End If

        End If

    Next