Private Sub Main_FormClosing(ByVal sender As Object, ByVal e As _
  System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
 
        If MessageBox.Show("Wollen sie die Änderungen in der Datenbank" & _
          "speichern?", "PMS - Datenbank", MessageBoxButtons.YesNoCancel, _
          MessageBoxIcon.Warning, 0, 0, False) = Windows.Forms.DialogResult.Yes _
          Then
            ds_save()
        ElseIf Windows.Forms.DialogResult.Abort Then
            ' Abort Closing / Aber wie?!?
        End If
 
End Sub