运行代码：
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
VB编程：申明窗体数组-40
2022-08-24
121
版权
版权声明：
本文内容由阿里云实名注册用户自发贡献，版权归原作者所有，阿里云开发者社区不拥有其著作权，亦不承担相应法律责任。具体规则请查看《
阿里云开发者社区用户服务协议》和
《阿里云开发者社区知识产权保护指引》。如果您发现本社区中有涉嫌抄袭的内容，填写
侵权投诉表单进行举报，一经查实，本社区将立刻删除涉嫌侵权内容。
简介：
VB编程：申明窗体数组-40
目录
相关文章
