كيف تعرف اذا كانت الفورم محملة في الذاكرة؟

هذا الكود يفحص اذا كانت الفورم محملة في الذاكرة...

Dim frm As Form

    Load Form2

   On Error Resume Next

    

   For Each frm In Forms

      If frm.Name = "Form2" Then

         MsgBox " yes "

         Exit Sub

      End If

   Next

   MsgBox "no"