什么定义数组窗体

wzqqwz

我要定义这样的窗体

dim kkk1 as new from1
dim kkk2 as new from1
dim kkk3 as new from1
dim kkk4 as new from1
dim kkk5 as new from1
..........
.........
dim kkk100 as new from1

我这样定必
for i=1 to 100
dim kkk(i) as new from1
next i

结果VB报错,说"要求常数表达式"----(i)这个数

要什么样才能定义数组窗体啊??

wzqqwz

问题已解结

Form1中
Dim kkk() As New Form2

Private Sub Form_Load()
ReDim kkk(1 To 100)
   for i=1 to 10
     kkk(i).Visible = True
     kkk(i).show
   next i
End Sub