'Eingaben in TextBoxen prüfen
        If String.IsNullOrEmpty(BuchungsdatumTextBox.Text) Then : _
          Fehler_Pflichtfeld_Angelegt("Datum:") : Return : End If
        If String.IsNullOrEmpty(BuchungsartTextBox.Text) Then : _
        Fehler_Pflichtfeld_Buchungsart("Buchungsart:") : Return : End If
        If String.IsNullOrEmpty(KategorieTextBox.Text) Then : _
        Fehler_Pflichtfeld_Kategorie("Kategorie:") : Return : End If
        If String.IsNullOrEmpty(KommentarTextBox.Text) Then : _
        Fehler_Pflichtfeld_Kommentar("Kommentar:") : Return : End If
 
        'auf 0 Eingabe reagieren wenn neuer Datensatz angelegt wird
        If (chb_Status_Neu.Checked = True) And (Merker_Betrag = 0) Then
            'Daten nicht speichern erst Datenfelder füllen >> speichern
        ElseIf (chb_Status_berabeiten.Checked = True) And (Merker_Betrag = 0) _
          Then  'auf 0 Eingabe und Änderung reagieren
            'Daten nicht speichern
        ElseIf (BS_Kontodetails_TypRow.Betrag <> Merker_Betrag) Then         _
                 'hier Datenabgleich mit Datarow
            'Datenänderung speichern abfrage ausgeben mit OK >> speichern
        Else
 
 
        End If