Btw,

list.Selected(list.ListCount) = .F.

If you add this line to what Cetin sent me it clears the last item selected and leaves the intended record highlighted and positioned at the top of the list.(when multiselect is .T.)