易截截图软件、单文件、免安装、纯绿色、仅160KB

VB HOOK API

    各位,请问钩子是怎么运行的啊?请先看看我写的代码:
Public hhook
Private Sub Command1_Click()
hhook = SetWindowsHookEx(2, AddressOf testhook, 0, App.ThreadID)
End Sub
以下的是放在模块内的代码:
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 Declare Function UnhookWindowsHookEx Lib "user32" (ByVal hhook As Long) As Long
Public Function testhook(ByVal nCode As Long, ByVal wParam As Long, ByVal lParam As Long) As Long
MsgBox "运行到我了"
End Function
运行以上代码后,我只按了一下键盘,为什么会弹出2个对话框?当关闭第一个的时候 还会弹出一个,那样就一共弹出了3个“运行到我了”这是怎么回事?这个钩子是怎么运行的啊? 还有那个当我把以上代码msgbox "运行到我了"  换成msgbox ncode & wParam & lParam 的时候 为什么出现的是78,"310001",“-------”这种格式的字符呢? 怎么不是我键盘的按键字符呢?那要怎么转化成键盘上的字符?请各位指点一下
由于我刚学习这钩子,所以很多都不知道 ,也百度不到。希望大家帮帮我,原谅我问些基础问题。谢谢
你这只是简单的键盘钩子不算apihook

你要显示键盘的按键的话要转换

你后面的ncode的78就是你按下的键盘的acii码,转换了以后就可以了

78的对应值是N

钩子安装后,不用了,是需要卸载的.

.......还没把HOOK与HOOK API各是什


相关问答:

关于ASP.net(vb)播放监控录像的问题

我有厂家做的ASP的监控录像(DVR)的局域网播放的源程序与控件,想要用ASP.net做一个视频回放的程序(利用他的控件)但不知如下去做,望各位指点。
先搞清楚他们的控件是怎么用的,
然后就直接用好了.
不过,如 ......

asp.net(vb)问题

login.aspx.vb:

    Public ReadOnly Property nameT() As String
        Get
            Return TextBox1.Text
    &nb ......

vb datagrid sql

一个窗体,3个datagrid,共计3个表,一个表对应一个datagrid,点击datagrid1(打开该窗体时已经被赋值),根据datagrid1中的某个值,查询表2和表3,并把符合条件的分别赋值给datagrid2和datagrid3,要怎么写

VB ......

vb+sql

在VB中,如何执行下面的SQL语句
Update t_Icitem Set f_102 = IsNull(f_102,0)+1 Where FNumber='0001'
比如:
cn.execute("Update t_Icitem Set f_102 = IsNull(f_102,0)+1 Where FNumber=&# ......

VB调用word后出现的问题

我用VB调用Word 嵌入VB窗体中(这些都是正常)

然后在桌面打开另一个word a.doc


现在问题出来了.....我关闭VB窗体,之前的那个word也正常关闭了

接下来闭关a.doc 会出现问题

我调用的w ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号