LOCAL lcFile

#define KEYEVENTF_KEYUP  2
#define KEYEVENTF_EXTENDEDKEY  1 
#define CTRL 0x11
#define Akey  0x41
#define Ckey  0x43

DECLARE INTEGER keybd_event IN Win32API ;
      INTEGER, INTEGER, INTEGER, INTEGER

lcFile = GETFILE("prg")
MODIFY COMMAND (lcFile) NOWAIT
      
keybd_event( CTRL,    0, KEYEVENTF_EXTENDEDKEY , 0 ) && ctrl key down
keybd_event( AKEY,    0, KEYEVENTF_EXTENDEDKEY , 0 ) && A key down

keybd_event( CTRL,    0, KEYEVENTF_EXTENDEDKEY+KEYEVENTF_KEYUP, 0 ) && ctrl key up
keybd_event( CKEY,    0, KEYEVENTF_EXTENDEDKEY+KEYEVENTF_KEYUP, 0 ) && C key up