Hi Vijay,

* textbox::KeyPress
 IF nKeyCode=4 AND nShiftAltCtrl=0
         IF This.SelStart=LEN(LTRIM(This.Text))-1
            KEYB "{TAB}{DNARROW}" PLAIN CLEAR
            NODEFAULT
            RETURN
         ENDIF
      ENDIF

MartinaJ

>hi all
>
>grid1
>
>r1c1 r1c2 r1c3
>r2c1 r2c2 r3c3
>
>when input a data in grid last cell r1c3 and press enter key set focus in r2c1
>
>help me
>
>regards
>vijay kumar