Pages

Thursday, July 17, 2014

Menjumlahkan Field Db Grid (VB.Net 2008)



    Sub total()
        Dim total_bayar As Double = 0
        For Each row As DataGridViewRow In dgv_rental.Rows
            total_bayar += Convert.ToDouble(row.Cells(5).Value)
        Next
        Text_Total.Text = total_bayar
    End Sub

No comments:

Post a Comment