[VB6] Form MDI: controllo child aperte

[yyzyyz]

Originariamente inviato da keeper76
Ho un programma costituito da un MDIForm e un normale Form, vorrei fare un controllo del genere: quando chiudo il form MDI da Menu' o dalla X controllasse se ci sono altri form aperti del programma e se cosi' fosse che mi restituisse un msgbox.

Private Sub CloseAll()
    
    On Error Resume Next
    Err = 0
    Do Until Err
        Unload MDIForm1.ActiveForm
    Loop
End Sub