suma en un lisbox

juan
27 de Enero del 2006
hola que tal me pregunto si me `pueden ayudar a realizar la suma de los elementos en un listbox
desde un datagrid se les da click y son agregados a un listbox pero no me salen las sumas
agradecere a quien me pueda apoyar en esto

mvallejos
27 de Enero del 2006
Supongo que en el listBox agregas valores numéricos.

Dim i as Integer
Dim Total as LOng

For i = 0 to List1.ListCount -1
Total = Total + Val(List1.List(i))
Next i

Saludos