Add numbers from a list to textbox

[wesoonline]

hi all

I am trying to add numbers from a listbox to text in vb6

i have a list and numbers in it
and a textbox

i would like the sum of what's inside the list to appear inside the textbox
can ou help me with this??

thanx in advance
weso.n

[Phil Weber]

Dim I As Integer
Dim sum As Long

For I = 0 To lstBox.ListCount - 1
    sum = sum + Val(lstBox.List(I))
Next

txtBox.Text = sum

[wesoonline]

thaaaaaaaaaaaaaaaaanx maaaan

you are the best

may god pless you