Adding items to Listbox

[Wreidek]

Sorry if Im being slow but I can find no way to add items into a listbox. Can anyone help me with this?

Thanks

[PaPi]

This is a sample code:

` listbox sample By PaPi
object myform as form
     center=true
     myform.AutoSize=true
     object LB_one as listbox
           width=200:height=200
           item(0)="Please click on this item!"
           item(1)="text 1"
           onclick=add_item
     end object
end object
myform.ShowModal
sub add_item()
     dim i as integer
     i=LB_one.ItemCount
     LB_one.item(i)="text "+str$(i)
end sub

[Wreidek]

Thanks for the help Papi