发新话题
打印

什么定义数组窗体

这样当然报错了。
复制内容到剪贴板
代码:
    Dim kkk() As Form1
    For i = 1 To 100
        ReDim kkk(i)
        Set kkk(i) = New Form1
    Next i

TOP

发新话题