listview

Algo asi talvez sirva segun te entiendo:
Dim SumaPrecios as Decimal = 0
Dim itm As ListViewItem
For Each itm In lvwDetalles.Items
Abonado += CType(itm.SubItems(<indice de la columna de
precios>).Text, Decimal)
Next

Perdon, en lugar de Abonado, es SumaPrecios... se entiende o no?

"Eduardo Alvarado Meza"
escribió en el mensaje
news:

Algo asi talvez sirva segun te entiendo:
Dim SumaPrecios as Decimal = 0
Dim itm As ListViewItem
For Each itm In lvwDetalles.Items
Abonado += CType(itm.SubItems(<indice de la columna de
precios>).Text, Decimal)
Next

si gracias

"Eduardo Alvarado Meza" escribió en el mensaje
news:%

Perdon, en lugar de Abonado, es SumaPrecios... se entiende o no?

"Eduardo Alvarado Meza"
escribió en el mensaje
news:

Algo asi talvez sirva segun te entiendo:
Dim SumaPrecios as Decimal = 0
Dim itm As ListViewItem
For Each itm In lvwDetalles.Items
Abonado += CType(itm.SubItems(<indice de la columna de
precios>).Text, Decimal)
Next

Dim col as Integer
col=numero Columna del campo precio
Dim i as Integer
Dim suma as Decimal
For i=0 to ListView1.Items.Count - 1
With ListView1.Items.Item(i)
suma += Decimal.Parse(.Item(col).Text)
End With
End For
MsgBox("Suma = " & suma.ToString)