如何得到窗体中的所有的控件
如何得到窗体中的所有的控件，且把控件所有背景颜色更改为一种颜色

[解决办法]
Private Sub Command1_Click()
On Error Resume Next
Dim x As Object
For Each x In Me.Controls
x.BackColor = vbRed
Next
End Sub
[解决办法]
Private Sub Command1_Click()
On Error Resume Next
Dim x As Object
For Each x In Me.Controls
x.BackColor = vbRed
Next
End Sub