高手为什么小弟我在VB6.0中想使用钩子函数会出现有关问题
请教各位高手为什么我在VB6.0中想使用钩子函数会出现问题
Public Declare Function CallNextHookEx Lib "user32 " (ByVal hHook As Long, ByVal nCode As Long, wParam As Long, lParam As Long) As Long
Public Declare Function UnhookWindowsHookEx Lib "user32 " (ByVal hHook As Long) As Long
Public Declare Function SetWindowsHookEx Lib "user32 " Alias "SetWindowsHookExA " (ByVal idHook As Long, ByVal lpfn As Long, ByVal hmod As Long, ByVal dwThreadId As Long) As Long
这三行总报错!
谢谢好心人给我个具体的回答!
------解决方案--------------------
你要把以public方式声明的api函数放到标准模块中
Public Declare Function CallNextHookEx Lib "user32 " (ByVal hHook As Long, ByVal nCode As Long, wParam As Long, lParam As Long) As Long
Public Declare Function UnhookWindowsHookEx Lib "user32 " (ByVal hHook As Long) As Long
Public Declare Function SetWindowsHookEx Lib "user32 " Alias "SetWindowsHookExA " (ByVal idHook As Long, ByVal lpfn As Long, ByVal hmod As Long, ByVal dwThreadId As Long) As Long
这三行总报错!
谢谢好心人给我个具体的回答!
------解决方案--------------------
你要把以public方式声明的api函数放到标准模块中