29-01-18, 08:04 AM
(آخر تعديل لهذه المشاركة : 29-01-18, 08:05 AM {2} بواسطة nooralcown.)
اولا البرنامج ما فتحش معاي
ثانيا انا ما اشتغلتش على التقارير
لكن على اداة داتا قرايد فيو اشتغلت الفكرة هذه وهذا هو الكود ربما تسفيد منه
For i = 1 To DataGridView2.RowCount - 1
DataGridView2.Rows(i).Cells(4).Value() = Val(DataGridView2.Rows(i - 1).Cells(4).Value) + Val(DataGridView2.Rows(i).Cells(2).Value) - Val(DataGridView2.Rows(i).Cells(3).Value)
Next i
ثانيا انا ما اشتغلتش على التقارير
لكن على اداة داتا قرايد فيو اشتغلت الفكرة هذه وهذا هو الكود ربما تسفيد منه
For i = 1 To DataGridView2.RowCount - 1
DataGridView2.Rows(i).Cells(4).Value() = Val(DataGridView2.Rows(i - 1).Cells(4).Value) + Val(DataGridView2.Rows(i).Cells(2).Value) - Val(DataGridView2.Rows(i).Cells(3).Value)
Next i
