Declare Function SetWindowsHookEx _
        Lib "user32" _
        Alias "SetWindowsHookExA" ( _
        ByVal nFilterType As Long, _
        ByVal hkPrc As Long, _
        ByVal hMod As Long, _
        ByVal dwThreadId As Long) As Long
 
' Hook für Tastaturüberwachung wieder ausschalten
Declare Function UnhookWindowsHookEx Lib "user32" _
        (ByVal hHook As Long) As Long
 
' Informationen an nächsten Hook weitergeben
Declare Function CallNextHookEx Lib "user32" _
        (ByVal hHook As Long, _
        ByVal nCode As Long, _
        ByVal wParam As Long, _
        ByVal lParam As Long) As Long