SUMA DE UN LIST - VB-MUNDO

niwdeck · #1 (**permalink**) 04-11-2006, 20:11:51

hola ante todo y espero respuestas:
quiero sumar los valores de un list y q total vaya a un text.
es sobre un programa de boleta de venta .
quiero sumar los valores que se acumulan en el list(integer)
COMO LO PUEDO HACER

LaNGuiS · #2 (**permalink**) 04-11-2006, 20:17:46

for I = 0 to list.listcount - 1
total = total +val(list.list(I))
next

text.caption = total

ricvar15 · #3 (**permalink**) 23-11-2006, 15:24:26

Aqui tienes algo para tu ayuda

dim total as integer
dim i as integer

For i = 0 To List1.ListCount - 1
total = total + List1.List(i)
Next i
total = total
txtTotal = total ' aqui va el nombre de tu text

jrios03 · #4 (**permalink**) 23-11-2006, 15:37:22

Puedes hacerlo de esta forma tb... para que te asegures que todo lo que estás sumando lo sumes en formato entero:

Código:

  Dim i As Integer
  Dim suma As Long
  suma = 0
  For i = 0 To List1.ListCount - 1
    suma = suma + Int(Val(List1.List(i)))
  Next i
  Text1.Text = suma

Espero que te sirva...

Saludos... :smt004