FoxPro/Visual FoxPro - Ayuda con busqueda

Hola como le hago para evaluar lo siguiente.

Necesito saber si el codigo ingresado existe en mi tabla producto.

En el evento valid de un text:

Select Mi_tabla
Set order to Campo_buscar
x1=Thisform.text1.value &&Dato a buscar ingresado por usuario
seek x1
If Found()
Wait Window "Dato encontrado" nowait
else
messagebox("El Dato no se encontró, verifique de nuevo",0+16,"Error")
Thisform.text1.value=0
Return .f.
Endif

Suerte