'index用于控件数组 往窗体上拖一个TextBox 将其index设置为1 示例代码如下： Private Sub Form_Click() For i = 2 To 4 Load Text1(i) Text1(i).Visible = True Text1(i).Left = Text1(i - 1).Left + Text1(i - 1).Width Next i End Sub
