FoxPro/Visual FoxPro - Desplazarse en un control Grid

Que tal amigos :

Estoy tratando de realizar un codigo que permita al usuario desplazarse con las flechas direccionales dentro de un GRID que contiene varios controles TextBox y ademas 2 controles EditBox.

Aqui el codigo de lo avanzado.

LOCAL lnCol,lnRow,nColumn
WITH this.Parent.Parent
lnCol=.ActiveColumn
lnRow=.ActiveRow
lnColumn=.Columncount
ENDWITH

DO CASE
CASE nKeyCode=4 && Right Arrow
NODEFAULT
KEYBOARD '{TAB}'
CASE nKeyCode=19 && left Arrow
NODEFAULT
....
...
ENDCASE

Agradezco me puedan ayudar a terminar el codigo.

Saludos,

INTEGRAL