Put this in the interactivechange event of the textbox

set exact off

for i = 1 to alen(nicky)
if upper(nicky(i)) = upper(alltrim(thisform.text1.value))
thisform.list1.selectedID(i)=.t.
endif
endfor
thisform.refresh