Sumar valores de un DataGridView
Publicado por Dario (1 intervención) el 07/02/2016 23:52:33
Hola Gente, tengo el sig. código:
A medida que voy marcando las filas desde la columna Enviar (Tipo: CheckBox) quiero sumar los valores de la columna Monto y que el resultado lo devuelva al ltotal, que se sumen unicamente las filas que fueron marcadas con el CheckBox. Según mi codigo el resultado que obtengo no los suma correctamente. Podrian decirme en donde tengo el error, pasar código por favor.
Muchas gracias a todos
Saludos.
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
Private Sub datacartera_CellContentClick(sender As Object, e As DataGridViewCellEventArgs) Handles datacartera.CellContentClick
If e.ColumnIndex = Me.datacartera.Columns.Item("enviar").Index Then
Dim chkcell As DataGridViewCheckBoxCell = Me.datacartera.Rows(e.RowIndex).Cells("enviar")
chkcell.Value = Not chkcell.Value
For Each row As DataGridViewRow In datacartera.Rows
Dim marcado As Boolean = Convert.ToBoolean(row.Cells("enviar").Value)
If marcado Then
Dim valores As Decimal = 0D
Dim total As Decimal = 0D
For Each dgvr As DataGridViewRow In Me.datacartera.Rows
Dim suma_marcado = Convert.ToString(row.Cells("monto").Value)
'Eliminamos los puntos
suma_marcado = Replace(suma_marcado, ".", "")
'Reemplazamos las comas
suma_marcado = Replace(suma_marcado, ",", ".")
valores += Val(suma_marcado)
Next
total = valores
ltotal.Text = total.ToString("#0.00")
End If
Next
End If
End Sub
A medida que voy marcando las filas desde la columna Enviar (Tipo: CheckBox) quiero sumar los valores de la columna Monto y que el resultado lo devuelva al ltotal, que se sumen unicamente las filas que fueron marcadas con el CheckBox. Según mi codigo el resultado que obtengo no los suma correctamente. Podrian decirme en donde tengo el error, pasar código por favor.
Muchas gracias a todos
Saludos.
Valora esta pregunta


0