LPARAMETERS nKeyCode, nShiftAltCtrl
With ThisForm.ActiveControl
    If Upper(.Name)="GRID1" And (m.nKeyCode=13 OR m.nKeyCode=9)
        If .ActiveColumn=29 &&判断当前焦点是否在Grid控件的最后一个字段上
            Keyboard "{DnArrow}" Plain &&是则下移一行
        Endif
    Endif
Endwith

请帮帮