09/07/2007, 12:07
|
 | | | Fecha de Ingreso: junio-2007 Ubicación: Yucatán - México
Mensajes: 87
Antigüedad: 17 años, 10 meses Puntos: 0 | |
| Re: como sumo los elementos de una lista
Public Function SumarElementos(Lista As Integer) As Integer
Dim i As Integer
Dim Suma As Integer
Suma = 0
For i = 0 To Lista - 1
Suma = Suma + List1.Items.Item(i)
Next
SumarElementos = Suma
return Sumar Elementos
End Function
' Te pedia matriz porque escribiste lista(i) y tienes declarado lista como integer... tu listBox se llama List1 no? |