[مصمم هاوي]

الحمد لله نجحتُ في جمع الدرجات داخل جدول الداتا قريد بهذا الكود، وأي تطوير لهذا الكود فمرحباً به

كود :

Dim X As Integer
For X = 0 To DataGrid1.ApproxCount - 1

DataGrid1.Col = 1
DataGrid1.Row = X
DataGrid1.Columns(10) = Val(DataGrid1.Columns(9)) + Val(DataGrid1.Columns(8))
Next