VB 6 - controllare se un form è aperto

[angelicab]

ciao!
come si può controllare che un form è aperto??

[Pestilence]

la dico come mi viene

Private Sub Command1_Click()
If Form2.Visible = True Then
MsgBox "il form " & Form2.Caption & " è attivo"
Else
MsgBox "il form " & Form2.Caption & " non è attivo"
End If
End Sub

ciaps

[angelicab]

grazie mille

[angelicab]

uff.. se il form è chiuso mi da errore..

[xegallo]

dim FRM as form

for each FRM in forms
   if frm.name = "form che cerchi tu" then
       msgbox "il form è aperto"
   end if
next FRM