old Hippy
Gebruiker
- Lid geworden
- 24 mei 2008
- Berichten
- 911
Hallo allemaal
ik wil graag de berekening in de datagrid laten uitvoeren.
Op het momen dat er een getal in de kolom aantal eenheden word ingegeven.
De berekening werkt goed.
Afbeelding om het wat makelijker voor te stellen.
Old Hippy
ik wil graag de berekening in de datagrid laten uitvoeren.
Op het momen dat er een getal in de kolom aantal eenheden word ingegeven.
De berekening werkt goed.
Code:
Try
If Me.ArtikelenBindingSource.Position > -1 Then
Dim Voorraad As Double = 0
Dim Prijspst As Double = 0
For Each row As DataRowView In Me.ArtikelenBindingSource.List
Try
Prijspst = +row!Prijspst
Voorraad += row!Voorraad
Catch ex As Exception
Exit Try
End Try
Next
Me.TextBox1.Text = FormatCurrency(Prijspst, 3)
Me.TXTVoorraadartikel.Text = Voorraad
' Hist = vor
Else
Me.TXTVoorraadartikel.Text = ""
End If
Catch ex As Exception
End Try
Afbeelding om het wat makelijker voor te stellen.

Old Hippy
Laatst bewerkt: