Form 加载为新开,而不是覆盖

Question

举个例子：
新建一form1,上有一Command1的控件，单击加载form2窗体. 再次单击新开一个form2窗体，而不是重新加载form2窗体。
(单击两次Command1按钮,会有两个form2窗体)Private Sub Command1_Click()
Form2.Show
End Sub如何实现?
谢谢!

Answer 1

private sub command1_click()
    dim frm as form
    set frm = new form2
    frm.show
end sub

Answer 2

是这样
Private   Sub   Command1_Click()
    Dim f As New Form2 
    f.Show 
End   Sub 

Answer 3

Private   Sub   Command1_Click() 
Dim f As New Form2
f.ShowEnd   Sub 

Answer 4

private sub command1_click()
    dim frm as form
    set frm = new form2
    frm.show
end sub的问题是:
现在有3个form: form1, form2, form2 . 
有点乱................