Visual Basic.NET - DataGridView

Dim total As Decimal = 0D

Dim suma_articulos As String

For Each dgvr As DataGridViewRow In Me.dataalmacen.Rows

suma_articulos = "" & dgvr.Cells(9).Value

'Eliminamos los puntos

 suma_articulos = Replace(suma_articulos, ".", "")

'Reemplazamos las comas

suma_articulos = Replace(suma_articulos, ",", ".")

total += Val(suma_articulos)

Next

txt_total.Text = total.ToString("#0.00")

If (dgvr.Cells(numero_columna_concepto).Value = "1") Then

     suma_articulos = "" & dgvr.Cells(9).Value

End If

dim suma as double=0

For Each dgvr As DataGridViewRow In Me.dataalmacen.Rows

If (dgvr.Cells(numero_columna_concepto).Value = "1") Then

suma+=val( dgvr.Cells(9).Value)

end if

Next

txt_total.Text = suma.ToString("#0.00")