如:
For Each c As Winform.Control In Forms("窗口1").Controls Output.Show("控件名称:" & c.name) Output.Show("宽度:" & c.Width) Output.Show("垂直位置:" & c.Top)Next