SoloCodigo

Programación General => Visual Basic 6.0 e inferiores => Mensaje iniciado por: CAMELPC en Sábado 24 de Febrero de 2007, 16:26

Título: Sumar
Publicado por: CAMELPC en Sábado 24 de Febrero de 2007, 16:26

tengo un monton de numeros metidos en una list box. cada uno en una linea, como puedo sumar todos los registros metidos en ese listbox para hacer un total

Título: Re: Sumar
Publicado por: mamex en Sábado 24 de Febrero de 2007, 18:22

Aquí está una solución:

Código: Text

1.  
2. Private Function suma() As Integer
3.     Dim i As Integer
4.     For i = 0 To List1.ListCount - 1
5.         suma = suma + List1.List(i)
6.     Next i
7. End Function
8.  
9.