¿Hice un formulario con el botón de buscar por ncontrol?

tengo un formulario que tiene un botón buscar por Ncontrol (numero de control) la cual no me funciona yo lo tengo así y seria de gran ayuda que pudiera ayudarme en el error que tengo

select tabla1
go top
LOCATE FOR Ncontrol=(thisform.txtbuscar.Value)
if found( ) then
thisform.txtbuscar.value=Ncontrol
thisform.txtNcontrol.value=Ncontrol
thisform.txtTitulo.value=Titulo
thisform.txtAutor.value=Autor
thisform.txtEdicion.value=Edición
thisform.txtGenero.value=Genero
Thisform.refresh
messagebox("Se encotro",2,"no se encuentra")
else
Thisform.txtbuscar.Setfocus( )
endif

bueno gracias!!!