如何动态创建一个窗体,然后delete掉

Question

RT

Answer 1

完全的动态创建比较困难。一般是先放上一个空的frmXXX，然后用New来创建frmXXX的多个副本。Unload就可以释放了

Answer 2

//用New来创建frmXXX的多个副本
该怎么写呢

Answer 3

Dim WithEvents frmMine As Form..............Set frmMine = New Form
....
Set frmMine = Nothing
//////////

Answer 4

楼上的可以吗？？你去试试看吧，Invalid Use Of New Keyword

Answer 5

工程中添加两个窗体，form1和form2, 下例是在form1中的代码，Option Explicit
Dim frm As Form2Private Sub Command1_Click()    Set frm = New Form2
    frm.ShowEnd SubPrivate Sub Command2_Click()    Unload frm
    Set frm = NothingEnd Sub