[VB6] Controllare presenza form MDI Child attivi

[kolore]

Ciao a tutti.
Ho un MDIform con all'interno varie form child.
Quando seleziono la voce esci dal menu dell'MDI vorrei fare un controllo per vedere se sono presenti delle form Child Aperte.
In VBA usavo la proprietà isloaded ma in VB non so cosa usare.
Qualcuno saprebbe indicarmi?

[cesco]

puoi usare l'activeform....
praticamente...
questa funzione mi serviva per aprire un form nell'mdi solo che controllavo se ne esistevano altri..quindi chiudevo gli altri form..

credo ti possa essere utile..

Public Function ControlloForm(FormC As String) As String
Dim FormContr As Form
    Set FormContr = FrmPrincipale.ActiveForm
    If Not FormContr Is Nothing Then Unload FormContr
End Function

ciao

[kolore]

Grazie per l'aiuto.

Scusa la domando forse sciocca, ma se creo un ciclo do loop di questo tipo:

do
formContr = frmPrincipale.activeform
if not formcontr is nothing then
'Avverto l'utente e chiudo la form
else
exit do
end if
loop

Quando chiudo la form attiva se rilancio il controllo mi rileva una secondo eventuale form aperta (che quindi diventarebbe la principale)?

Ciao

[cesco]

nn ho mai provato.....
cmq se è un errore che nn ti implica lo stop del programma puoi
mettere
on error resume next...
vedi..te..
io on error resume next lo uso quando..
nn voglio far allargare la form e metto i miei parametri..
infatti mi rompe le scatole sul vbmaximed..(qualcosa)
ma mettendo on error resume next..cmq nn mi da fastidio..logicamente...devi stare attento ad usarlo...mettilo solo in quel metodo..altrimenti ...nn ti farà vedere altri bug...
capito..

[kolore]

ok grazie!

ciao