一个小问题在线等

Question

我现在有一个窗口A，在另一个窗口的某事件里我希望点击的话卸掉A再load A，但怎么判断A的存在？   If Form1 Then
   
   Unload Form1
   
   '重新加载
   Load Form1
   
   Form1.Show
  
  End If这样肯定不对。 。。

Answer 1

说错了,遍历Forms集合for each frm In Forms
    用frm.name判断
next

Answer 2

具体就是这样的：
Private Sub Command1_Click()
    Dim f As Form
    For Each f In Forms
        If f.Name = "Form1" Then
            Unload f
            Form1.Show
            Exit Sub
        End If
    Next
End Sub