Programación General > Visual Basic 6.0 e inferiores

 Sumar

(1/1)

CAMELPC:
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

mamex:
Aquí está una solución:


--- Código: Text --- Private Function suma() As Integer    Dim i As Integer    For i = 0 To List1.ListCount - 1        suma = suma + List1.List(i)    Next iEnd Function  

Navegación

[0] Índice de Mensajes

Ir a la versión completa