Escape-Taste simulieren

Hallo,

ich wollte eine Escape-Taste simulieren, die dann in einem externen Programm eine Aktion abbricht. Ich benutze dafür SendKeys, die gut funktioniert, allerdings nicht bei der Escape-Taste. Dabei leuchtet aber die NumLock Lampe immer wieder auf, wenn die ESC-Taste simuliert wird. Ich habe Windows ME und Win 2000 probiert, bei beiden tritt der Effekt auf.
Kann man die Taste noch anders simulieren?

Danke

Private Declare Sub keybd\_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)
Private Const VK\_ESCAPE = &H1B
Private Const VK\_MENU = &H12
'
keybd\_event VK\_ESCAPE, 0, 0, 0 ' press
keybd\_event VK\_ESCAPE, 0, KEYEVENTF\_KEYUP, 0 ' release
'
'
'Es gehen auch Tasten-Kombinationen - wie hier ALT + Z:
'
keybd\_event VK\_MENU, 0, 0, 0 ' press Alt
keybd\_event Asc("Z"), 0, 0, 0 ' press Z
keybd\_event Asc("Z"), 0, KEYEVENTF\_KEYUP, 0 ' release Z
keybd\_event VK\_MENU, 0, KEYEVENTF\_KEYUP, 0 ' release Alt

greets from michL (vienna)