vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
vb@rchiv Offline-Reader - exklusiv auf der vb@rchiv CD Vol.4  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   RSS-Feeds  | Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2021
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

VB.NET - Ein- und Umsteiger
Saldo richtig rechnen ? 
Autor: ERBRU
Datum: 18.04.21 12:25

habe mir ein Form erstellt unter buchen soll nun ein korektes Salso gerechnet werden aus Ausgabe oder Einnahme

wer kann helfen ? die Tabelle hat diese Spalten:

Datum = Typ Date
Verwendungszweck = Typ String
Buchungstyp = Typ String (Einnahme, Ausgabe)
Betrag = Typ Integer
Saldo = Typ Integer

bei dieser Buchung müsste es -70 Saldo sein Richtig

Einnahme 30 Saldo 30
Einahme 30 Saldo 60
Ausgabe 60 Saldo 0
Ausgabe 20 Saldo 100
Ausgabe 50 Saldo 90

das ist falsch bei mir wie bekomme ich es richtig hin ?



dieser Code rechnet falsch, abr was ist falsch und wie richtig ?

Private Sub btnBuchen_Click(sender As Object, e As EventArgs) Handles _
  btnBuchen.Click
        Dim Saldo As Integer = 0
        For Each row As DataGridViewRow In dgvDaten.Rows
            Saldo += Convert.ToInt32(row.Cells(3).Value)
        Next
        If ComboBox1.SelectedIndex = -1 Then Return
        If txtBuchungstyp.Text = "Ausgabe" Then
            dt.Rows.Add(dtpDatum.Value.ToShortDateString, _
              txtVerwendungszweck.Text, txtBuchungstyp.Text, nudBetrag.Value, _
              Saldo - nudBetrag.Value)
            txtVerwendungszweck.Text = ""
            txtBuchungstyp.Text = ""
            nudBetrag.Value = 0
            ComboBox1.SelectedIndex = -1
        Else
            dt.Rows.Add(dtpDatum.Value.ToShortDateString, _
              txtVerwendungszweck.Text, txtBuchungstyp.Text, nudBetrag.Value, _
              Saldo + nudBetrag.Value)
            txtVerwendungszweck.Text = ""
            txtBuchungstyp.Text = ""
            nudBetrag.Value = 0
            ComboBox1.SelectedIndex = -1
        End If
    End Sub
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Saldo richtig rechnen ?187ERBRU18.04.21 12:25
Re: Saldo richtig rechnen ?55Manfred X19.04.21 08:57

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2021 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel