' Programmende durch Menu
Private Sub mnuDateiEnde_Click()
    AnwendungBeenden
End Sub

' Programmende durch Menu
Private Sub mnuDateiEnde_Click()
    unload formx ' x is dann der formname
    end ' beendet das programm ganz
End Sub

IHR SEID ALLE SO
mfG
dereric


P.S.: schreibt mir eine eMail