[raelkun00]

Private Sub Command1_Click()
Dim total1
For i = 0 To DataGrid1.ApproxCount - 1
DataGrid1.Col = 0
total1 = Val(total1) + Val(DataGrid1.Text)
Next
txtTotal.Text = total1
End Sub

It only displays the "value of first row* the number of record"
for example:
the first row is 3 and number of record is 15 it will display "15".
I need you help please. Thanks!

correction number of record is 5. Sorry.

[maj3091]

I'm not that clued up in the datagrid, but I would suspect that you need to increment the row, if you want to sum up the column data, otherwise you'll always stay in the first row.