Sumar columnas de items en Listview

[klaudio83]

Holas espero me puedan ayudar.
Estoy trabajando en Visual Studio 2008 y utilizando visual basic.net.

Bueno el problema es el siguiente, quiero sumar los items de una columna de un Listview, cada vez que se ingrese un nuevo item, y ese resultado mostarlo en un TexBox. Yo lo hago de la siguiente manera, pero me envia un error

El codigo:

Código vb.net:

Private Function SumaCantidad()
        Dim suma As Integer = 0
        Dim i As Integer ' = 1
       
        For i = 0 To ListView1.Items.Count 
                       suma = suma + CInt(ListView1.Items(i).SubItems(3).Text)
        Next
        
        txtTotalUnid.Text = suma
       
    End Function
 

El Error que me envia:
InvalidArgument=Value of '1' is not valid for 'index'. Parameter name: index

Espreo me puedan ayudar, Muchas gracias

[boluart]

Iniciado por klaudio83

For i = 0 To ListView1.Items.Count

For i = 0 To ListView1.Items.Count - 1

[gctalico]

prueba esto

Código:

Private Sub sumaTotal()
        Dim puntero As Integer = 1
        Dim totales As Decimal = 0
     

        While puntero < Grid1.Rows.Count

            totales = totales + Grid1(3, puntero - 1).Value
            puntero = puntero + 1

        End While

        txttotal.text = totales
    End Sub