怎样检查程序中哪些窗体加载解决办法

怎样检查程序中哪些窗体加载
程序某些模块需要切换，需要卸载掉可能使用的窗体，怎么检测哪些窗体加载了，然后针对性的卸载掉

[解决办法]

VB code

Private Sub Command1_Click()For i = 0 To Forms.Count - 1    If Forms(i).Name = "需要查找的窗体名" Then        MsgBox "窗体已经加载！"    End IfNextEnd Sub
[解决办法]
VB code
Private Sub Command1_Click()    Form2.Hide    Dim a As Form    For Each a In Forms        Debug.Print a.Name    Next    End Sub