vb.net

[Roebert Stump]

nunja - wen es jedenfalls interessiert - hier die Lösung wie es bei mir klappt:

Private Sub Form1_FormClosing(ByVal sender As System.Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles MyBase.FormClosing
        Dim Nachfrage As New MsgBoxResult
        Nachfrage = MsgBox("Möchten Sie das Programm wirklich beenden?", MsgBoxStyle.OkCancel, "Achtung")
        If (Nachfrage = MsgBoxResult.Ok) Then
            e.Cancel = False
        Else
            e.Cancel = True
        End If
    End Sub

die schlägt jetzt zu wenn die Anwendung über Alt+F4, das Menu oder auch das x oben in der Ecke geschlossen wird