在表单的load事件中:
LPARAMETERS nKeyCode, nShiftAltCtrl
do case
case nkeycode=5
thisform.image1.top=thisform.image1.top-10
case nkeycode=24
thisform.image1.top=thisform.image1.top+10
case nkeycode=19
thisform.image1.left=thisform.image1.left-10
case nkeycode=4
thisform.image1.left=thisform.image1.left+10
endcase