Ayuda Visual Fox

Saludos tengo un par de mese trabajando con Visual Fox 7
tengo enun formulario un text y un list,
en el Text "InteractiveChange" tengo el siguiente còdigo :
NOM="*"+ALLTRIM(STR(this.value)+"*")
thisform.List.rowSource="SELECT NoEmp FROM EMP ORDER BY NoEmp WHERE ;
                                       LIKE(NOM,ALlTRIM(NomEmp)) INTO CURSO TEMPORAL"
thisform.List.refresh
IF thisform.List.value=0
    MessageBox("No existe Empleado "+64)
ENDIF