急！大虾们，如何显示并打印VB工程里各个窗体的控件名?解决问题立即给45分！

Question

for each a in me
 print a.name
next

Answer 1

下面的代码可以，但是必须先加载工程中的所有窗体。
假如工程中有两个窗体，form1,form2
那么必须在使用这段代码时先使用 
LOAD FORM1
LOAD FORM2
语句
  Dim i As Long
  Dim obj As Control
    
  For i = 0 To Forms.Count - 1
    For Each obj In Forms(i).Controls
     Debug.Print obj.Name
    Next
  Next i

Answer 2

Private Sub Command1_Click()
Dim MyControl As Control
For Each MyControl In Me.Controls
Debug.Print MyControl.Name
Next
End Sub