tex något liknande
Sv: Summera värdena i en listbox
Svara
<code>
dim i as integer
dim summa as double
summa = 0
for i = 0 to listbox1.listcount -1
summa = summa + listbox1.list(i)
next i
text1.text = summa
</code>