[Resolved]
Here is the code if somebody need this:
Code:Sub Hitung() For i As Integer = 0 To dgv1.Rows.Count - 1 Dim A As Double = dgv1.Rows(i).Cells(2).Value Dim B As Double = dgv1.Rows(i).Cells(3).Value Dim C As Double = dgv1.Rows(i).Cells(4).Value dgv2.Rows(i).Cells(2).Value = (A+B+C) Next




Reply With Quote
