怎么实现把窗体上画好的控件数组做为函数的参数。

Question

我在窗体上画了三个Textbox控件组成一个名为MyText的控件数组，
然后我在窗口里写一个自己的函数
Private Sub MySub(Text1() As TextBox)
    For i = 0 To 3
        Text1(i).Text = "hello"
    Next
End Sub然后我在一个按钮里调用
Private Sub command1_click()
    Call MySub(Mytext())
End Sub可是程序不运行，大家帮忙看一下，怎么实现把窗体上画好的控件数组做为
函数的参数。

Answer 1

Private Sub MySub(Obj As Object)
    Obj.Text = "hello"
End SubPrivate Sub command1_click()
  for i=1 to 3
    Call MySub(Mytext(i))
  next i
End Sub