动态控件添加问题

假设要动态的添加一组控件，如添加option控件组，要先在窗体上画 一个option控件，并且将其index属性设置为1，然后可以用下面的语句：

For i = 1 To 5
      Load Option1(i)   ' 给数组添加 5 个选项按钮。
    Option1(i).Top = Option1(i - 1).Top + 350
        Option1(i).Visible = True
    Next i
    Option1(0).Caption = "Open"   ' 在每个选项按钮上放置标题。
    Option1(1).Caption = "Save"
    Option1(2).Caption = "Color"
    Option1(3).Caption = "Font"
   Option1(5).Caption = "Help"