if LEN(ALLTRIM(thisform.text10.value)) > =3 For x=1 to getwordcoun(thisform.text10.value) lcName = getwordnum(thisform.text10.value,m.x) if m.x=1 SELECT F4,F1,name4,name3,name2,name1 from x2; where name4=lcName ; ORDER by name4; into cursor crsMyCursor readwrite else endif endifthanks