DECLARE keybd_event IN user32;
	SHORT bVk, SHORT bScan, INTEGER dwFlags,;
	INTEGER dwExtraInfo

#DEFINE KEYEVENTF_KEYUP 2
#DEFINE vbKeyControl 17
#DEFINE vbKeyEscape 27

= keybd_event(vbKeyControl, 0, 0, 0)
= keybd_event(vbKeyEscape, 0, 0, 0)
DOEVENTS

= keybd_event(vbKeyControl, 0, KEYEVENTF_KEYUP, 0)
= keybd_event(vbKeyEscape, 0, KEYEVENTF_KEYUP, 0)
DOEVENTS