>hello,
>thank you for reply
>
>i put the code as it is(but i get a meesgae(filter cleard) and lcValue not found
>but the value found in mytable. any idea.

Yes, I've just realized that the macro is required because your variable
lcValue is probably going out of scope at the end of your routine.

Where do you see the message (filter cleared)?
Do you have SET TALK OFF in your code somewhere.
Try wrapping code snippets in < pre > and < /pre > tags (without the spaces).

>SELECT  book1
index on no tag no

lcValue= ['] + UPPER(ALLTRIM(THISFORM.TEXT24.VALUE)) + [']
SET FILTER TO UPPER(NO) = &lcValue.

LOCATE
IF EOF()
   MESSAGEBOX("NOT FOUND")
   *- Clear the filter.
   Set Filter To
ELSE
  THISFORM.GRID4.REFRESH
ENDIF
*- The following Endif looks redundant.
*--- endif
endif-------this is for if nkeycode=13