看流星社区

 找回密码
 注册账号
查看: 7234|回复: 6

[VB] 游戏屏蔽模拟按键,谁能给个驱动按键的教材啊,VB的

[复制链接]

该用户从未签到

发表于 2011-4-11 09:18:12 | 显示全部楼层 |阅读模式
游戏屏蔽模拟按键,谁能给个驱动按键的教材啊,VB的

该用户从未签到

发表于 2011-4-11 09:18:22 | 显示全部楼层
Public Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal Scan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)

Public Declare Function MapVirtualKey Lib "user32" Alias "MapVirtualKeyA" (ByVal wCode As Long, ByVal wMapType As Long) As Long


Public Const KEYEVENTF_KEYUP = &H2

Public Const VK_KG = &H20

Public Const VK_TAB = &H9
Public Const VK_1 = &H31
Public Const VK_2 = &H32
Public Const VK_3 = &H33
Public Const VK_4 = &H34
Public Const VK_5 = &H35
Public Const VK_6 = &H36
Public Const VK_7 = &H37
Public Const VK_8 = &H38
Public Const VK_9 = &H39
Public Const VK_F1 = &H70
Public Const VK_F2 = &H71
Public Const VK_F3 = &H72
Public Const VK_F4 = &H73
Public Const VK_F5 = &H74
Public Const VK_F6 = &H75
Public Const VK_F7 = &H76
Public Const VK_F8 = &H77
Public Const VK_F9 = &H78
Public Const VK_F10 = &H79
Public Const VK_F11 = &H7A
Public Const VK_F12 = &H7B


        keybd_event VK_TAB, MapVirtualKey(VK_TAB, 0), 0, 0                    '模拟TAB
        keybd_event VK_TAB, MapVirtualKey(VK_TAB, 0), KEYEVENTF_KEYUP, 0      '撤消TAB

该用户从未签到

发表于 2011-4-11 09:18:30 | 显示全部楼层
疯! 驱动 还想vb写 太nb了吧

该用户从未签到

发表于 2011-4-11 09:18:37 | 显示全部楼层
如果是屏蔽了sendmessage的话,可以用一楼的试试。不过没有句柄,前台窗口模拟按键。

该用户从未签到

发表于 2011-4-11 09:18:44 | 显示全部楼层
2楼的代码问题  游戏窗口没有获得焦点 怎么让游戏窗口获得焦点呢?

该用户从未签到

发表于 2011-4-11 09:18:57 | 显示全部楼层
主要是调用KeyboardClassServiceCallback函数,还有VB是不可能写出驱动的..
  • TA的每日心情
    开心
    2021-6-26 21:38
  • 发表于 2013-10-17 20:28:28 | 显示全部楼层
    vb是能够写出驱动的,见牛人写过
    点击按钮快速添加回复内容: 支持 高兴 激动 给力 加油 苦寻 生气 回帖 路过 感恩
    您需要登录后才可以回帖 登录 | 注册账号

    本版积分规则

    小黑屋|手机版|Archiver|看流星社区 |网站地图

    GMT+8, 2024-3-29 20:16

    Powered by Kanliuxing X3.4

    © 2010-2019 kanliuxing.com

    快速回复 返回顶部 返回列表