谁能用代码解释一下下面的For Each...In...语句?

Question

谁能用代码解释一下下面的For Each...In...语句?
Private FormOldWidth as Long
Private FormOldHeight as LongPublic sub a(Name as Form)
  Dim obj as Control
  
  FormOldWidth=Name.ScaleWidth
  FormOldHeight=Name.ScaleHeight  For Each obj In Name
      obj.Tag=obj.left & " " & obj.top & " " & obj.Width & " " & obj.Height & " "
  next obj
End sub

Answer 1

就是穷举Name窗体中所有控件
把所有控件的left 、 top 、Width 、Height 属性连接成字符串
存到控件的tag 属性中

Answer 2

楼上已经说得很清楚了把所有控件的left 、 top 、Width 、Height 属性连接成字符串，一空格隔开