Look in Selected property, I think You can set it programaticly (read/write at run time)
With little change of HELP example:
FOR nCnt = 1 TO ThisForm.lstListBox1.ListCount
ThisForm.lstListBox1.Selected(nCnt) = (nCht%2)==0
ENDFOR
(Never used or tested)
HTH
Against Stupidity the Gods themselves Contend in Vain - Johann Christoph Friedrich von Schiller
The only thing normal about database guys is their tables.