VB编程：申明窗体数组
运行效果
运行代码：
- Private Sub Command1_Click()
- Dim intx As Integer
- Dim frmnew(1 To 5) As New Form1 '使用new关键字，系统会创建新窗体
- For intx = 1 To 5
- frmnew(intx).Show
- frmnew(intx).WindowState = vbMinimized '将创建的窗体最小化
- Next
- End Sub
湘公网安备 43102202000103号
