Dim tot As Double
For i As Integer = 0 To dg.RowCount - 1
tot += Cdbl(dg.Rows(i).Cells(5).Value)
Next
txtTotal.Text = tot
Thanks In Advance




Posted 21 July 2011 - 04:59 AM
Dim tot As Double
For i As Integer = 0 To dg.RowCount - 1
tot += Cdbl(dg.Rows(i).Cells(5).Value)
Next
txtTotal.Text = tot
Posted 21 July 2011 - 05:17 AM
Posted 21 July 2011 - 05:30 AM
tot += CDbl(dg.Rows(i).Cells(5).Value)
1 EASY WEIGH KEYPAD 1 100 2 EASY WEIGH COMM PORT 1 100
Posted 21 July 2011 - 05:52 AM
This post has been edited by Nightfish: 21 July 2011 - 06:10 AM
