I found the solution

*** ActiveX Control Event ***
LPARAMETERS keycode, shift

nodefault

local lnKeyCode
lnKeyCode=keycode

do case

*-- INS
case keycode=45
lnKeycode=22

*-- DEL
case keycode=46
lnKeyCode=7

*-- END
case keycode=35
lnKeyCode=6

endcase

thisform.keypress(lnkeycode)