育才学习网1. “钩子”韩文怎么写/
【汉语】：钩子
【韩语解释】：钩子 /gōu zi//（钩子）/ 【汉韩简明词典】 [名]（1）. 갈고리（모양의 물건）.（2）. （동물의） 집게발. 钩子【汉韩小词典】 [名词]（1）. 갈구리，걸개（2）. 갈구리모양의것
--------------------------------------------------------------------------------
【相关知识】
--------------------------------------------------------------------------------
系统钩子 - 黑客防线 - 无
API钩子揭秘（下） - Internet信息世界 - IvoIvanov 赵雪峰
也谈炸弹钩子线 - 钓鱼 - 李洪生
让品牌名字带上“钩子”！ - 中国市场 - 张护明
让品牌名字带上“钩子”！ - 中小企业科技 - 张护明
生命中的钩子 - 中国残疾人 - 无
Win32下钩子的使用 - 微计算机应用 - 胡波 潘峰
第三代水果—悬钩子 - 河北林业 - 孟树标 温素卿
编写Win 32 API钩子 - 程序员 - 范武
悬钩子的加工 - 中国食品信息 - 邓红平
钩子及其应用 - 计算机应用 - 石京民，陈道敏，
给产品装个好“钩子” - 21世纪商业评论 - 余旭辉
钩子应用之鼠标钩子——取回忘记的密码 - 程序员 - 行舟
贵州悬钩子属（蔷薇科）一新种——务川悬钩子 - 植物分类学报 - 何顺志
钩子应用之键盘钩子——键盘小管家 - 程序员 - 行舟
2. 键盘钩子代码怎么写
写一个最简单的例子
新建一个模块，然后复制下面的代码
Declare Function UnhookWindowsHookEx Lib "user32" (ByVal hHook As Long) As Long
Declare Function SetWindowsHookEx Lib "user32" Alias "SetWindowsHookExA" (ByVal idHook As Long, ByVal lpfn As Long, ByVal hmod As Long, ByVal dwThreadId As Any) As Long
Declare Function CallNextHookEx Lib "user32" (ByVal hHook As Long, ByVal ncode As Long, ByVal wParam As Long, lParam As Any) As Long
Public Const HC_ACTION = 0
Public Function MyHook(ByVal ncode As Long, ByVal wParam As Long, ByVal lParam As Long) As Long
if ncode>=HC_ACTION then
If GetAsyncKeyState(VK_CONTROL) <> 0 And GetAsyncKeyState(vbKeyD) <> 0 Then
'如果按下了ctrl+d键。..
endif
endif
MyHook = CallNextHookEx(hHook, ncode, wParam, iparam)
End Function
以下代码复制到窗体
Private Sub Form_Load()
hook = SetWindowsHookEx(WH_KEYBOARD_LL, MYHook, App.hInstance, 0&)
End Sub
Private Sub Form_Unload(Cancel As Integer)
Call UnhookWindowsHookEx(hHook)
End Sub
希望你能看明白
