UC知道200分求一个用vb写的程序.
来源：百度知道 编辑：UC知道 时间：2024/05/19 15:37:18
我自己用vc写了一个myhook.dll,里面包含了setwindowshookex的2个消息函数.一个是键盘的.一个是鼠标的.分别是mouseproc和keyboardproc.也用了def文件来作导出.
现在我要用vb写一个钩子.我想把安装钩子这部分.也就是setwindowshookex放在vb里面来写.而不是写在那个dll中.该怎么写.请大家不要在网上抄袭.该看的我都看了,就算要抄.也请给我一个实在的例子,谢谢大家.如果满意我会再加200分的.
现在我要用vb写一个钩子.我想把安装钩子这部分.也就是setwindowshookex放在vb里面来写.而不是写在那个dll中.该怎么写.请大家不要在网上抄袭.该看的我都看了,就算要抄.也请给我一个实在的例子,谢谢大家.如果满意我会再加200分的.
你在百度贴吧也问了这个问题吧，似乎回答效果不明显
http://post.baidu.com/f?kz=141668660
我不会。推荐你去个地方
www.vbgood.com
可以看<今日说法>的节目,CCTV1中午12:45播,一定讲到这类问题!
好难呀
我问人去
他不会我就没办法拉
不会
Option Explicit
Private Declare Function InternetOpen Lib "wininet" Alias "InternetOpenA" (ByVal sAgent As String, ByVal lAccessType As Long, ByVal sProxyName As String, ByVal sProxyBypass As String, ByVal lFlags As Long) As Long
Private Declare Function InternetCloseHandle Lib "wininet" (ByRef hInet As Long) As Long
Private Declare Function InternetReadFile Lib "wininet" (ByVal hFile As Long, sBuffer As Byte, ByVal lNumBytesToRead As Long, lNumberOfBytesRead As Long) As Integer
Private Declare Function InternetOpenUrl Lib "wininet" Alias "I