Manualandia
a- a+

Chiudere FORM secondario attivo

Quando si desidera chiudere un form secondario attivo è necessario accedere alla proprietà ActiveForm del form MDI principale. Quando si usa un oggetto Collection per la gestione del form MDI dipendente, occorre utilizzare a tal fine una procedura che ricerchi il form attivo, scarichi il form MDI secondario e rimuova tale form dall'oggetto Collection.

Esempio:

 

Private Sub mnuClose_Click( )

    Dim I As Integer
    'ricerca il form MDI attivo
    For I = 1 To colMDIforms.Count
    'confronta le proprietà Caption

        If col.ColMDIforms.Item(I).Caption = MDIparent.ActiveForm.Caption Then

        'trovato il form MDI attivo, lo scarica
        Unload colMDIforms.Item(I)
        'rimuove il form dalla serie
        colMDIform.Remove I
        'esce dopo aver rimosso il form MDI secondario
         Exit Sub
        End If

    Next I

End Sub




Ti potrebbe interessare anche

commenta la notizia

C'è 1 commento
Marcello
Ti è piaciuto l'articolo?