
30/03/2013, 21:19
|
| | Fecha de Ingreso: febrero-2013
Mensajes: 21
Antigüedad: 12 años Puntos: 0 | |
¿Como sumar el total de todos los productos en datagridview? hola tengo este codigo que me realiza los calculos en el datagrid y me los muestra en textboxes Cita: rivate Sub DataGridView1_CellEndEdit(sender As Object, e As DataGridViewCellEventArgs) Handles DataGridView1.CellEndEdit
Dim Dt_Valor1, Dt_Valor2, Dt_valor3, Dt_Resultado, IVA, total, base_impo As Double
If DataGridView1.Columns(e.ColumnIndex).Name = "CANTIDAD" Or FACTURADataGridView.Columns(e.ColumnIndex).Name = "PRECIO" Then
Dt_Valor1 = Convert.ToDouble(DataGridView1.Rows(e.RowIndex).Ce lls("CANTIDAD").EditedFormattedValue)
Dt_Valor2 = Convert.ToDouble(DataGridView1.Rows(e.RowIndex).Ce lls("PRECIO").EditedFormattedValue)
Dt_valor3 = Convert.ToDouble(DataGridView1.Rows(e.RowIndex).Ce lls("IVA").EditedFormattedValue)
Dt_Resultado = (Dt_Valor1 * Dt_Valor2)
IVA = (Val(Dt_Resultado) * Val(Dt_valor3)) / 100
total = Val(Dt_Resultado)
base_impo = Val(total) - Val(IVA)
DataGridView1.Rows(e.RowIndex).Cells("TOTAL").Valu e = Format(Dt_Resultado, "$ #,##0.00")
SUMATextBox.Text = Format(Dt_Resultado, "$ #,##0.00")
IVATextBox.Text = Format(IVA, "$ #,##0.00")
BASE_IMPONIBLETextBox.Text = Format(base_impo, "$ #,##0.00")
TOTALTextBox.Text = Format(total, "$ #,##0.00")
ahora me gustaria que si tengo 3 articulos o mas el valor de cada uno se sumen y muestren el total en SUMAtextbox
Que modifico o adiciono gracias |