First you need to turn MultiSelect to .T. When you are ready to see which items are selected do the following:

* skip through and find selected items
FOR nCnt = 1 TO ThisForm.lstListBox1.ListCount
IF ThisForm.lstListBox1.Selected(nCnt)
* this item is selected - you can store it in an array or use
* the built in listbox array "List"
? ThisForm.lstListBox1.List(nCnt)
ENDIF
ENDFOR

Hope this helps.