Hola
carlosanpy pues ahi solo cuentas si la lista tiene solo 1 miembro o esta vacio pero no hace nada si tiene mas de 2 items, el codigo seria de esta manera :
Código vb.net:
Ver originalDim item As ListViewItem
item = New ListViewItem(DateTimePicker1.Text)
item.SubItems.Add(txtConcepto.Text)
item.SubItems.Add(txtMonto.Text)
If listControl.Items.Count = 0 Then
item.SubItems.Add(txtMonto.Text)
'Te falto decirle que si es mayor ó igual para que recorra todos los items
ElseIf listControl.Items.Count >= 1 Then
Dim Total As Double
For i = 1 To listControl.Items.Count - 1
' Y Convertir la cadena en Double para que sume correctamente
Total = Total + Convert.toDouble(listControl.Items(i).SubItems(2).Text)
Next
item.SubItems.Add(Total)
End If
item.SubItems.Add(txtObservaciones.Text)
listControl.Items.Add(item)