LPARAMETERS nKeyCode, nShiftAltCtrl WITH ThisForm DO CASE CASE nKeyCode = 1 && Home Key was pressed. ThisForm.cmdTop.Click() && Go to first record in Indexed table. CASE nKeyCode = 18 && Page Up key was pressed. ThisForm.cmdPrevious.Click() CASE nKeyCode = 3 && Page Down key was pressed. ThisForm.cmdNext.Click() CASE nKeyCode = 6 && End key was pressed. ThisForm.cmdBottom.Click() CASE nKeyCode = 27 && User hit Escape key ThisForm.cmdExit.Click() && Don't worry. If anything has changed, && user is offered a chance to save the && updates. CASE nKeyCode = -9 && Function Key F10 was pressed. .cmdSave.Click() ENDCASE ENDWITH