Hola, Tengo un boton con el que agrego datos al ListView y al mismo tiempo me guarda en la Tabla. Mas no cargo datos desde la base de datos. El ListView tiene 10 Columnas, en la ultima es donde muestra los Totales. Entonces necesito que al darle al boton agregar y se pasen los datos al ListView se muestren la suma de las filas de la columna totales en una linea del listview mas abajo. Y que cada vez que se agregue datos se sumen los mismos.
Dim cItem As MSComctlLib.ListItem
Dim iSumTotales As Double
Dim i As Integer
For i = 1 To lv.ListItems.Count - 3
iSumTotales = iSumTotales + CDbl(lv.ListItems(i).SubItems(11))
Next
Set cItem = lv.ListItems.Add(, , "TOTALES")
cItem.Bold = True
cItem.SubItems(1) = ""
cItem.SubItems(2) = ""
cItem.SubItems(3) = ""
cItem.SubItems(4) = ""
cItem.SubItems(5) = ""
cItem.SubItems(6) = ""
cItem.SubItems(7) = ""
cItem.SubItems(8) = ""
cItem.SubItems(9) = ""
cItem.SubItems(10) = ""
cItem.SubItems(10) = FormatNumber(iSumTotales, 2)
tengo ese código, pero no me suma del todo al primer clic y si le doy 5 veces al boton me muestra 5 veces el nombre TOTALES.