vb 模拟 数字键操作

xx = FindWindow(O&, "诛仙")  ‘窗体句柄
SendMessage xx, &H100, &H9, 0& '按TAB键
SendMessage xx, &H101, &H9, 0&
上面的代码能实现模拟TAB键的能用
 为什么下面的代码不能实现模拟1键，
SendMessage xx, &H100, &H49, 0& '按数字1键
SendMessage xx, &H101, &H49, 0&

解决方案 »

  1.   

    1的KEY 是
    VBkey1 
    是49
    但是10进制的.
    如果是16进制
    那就是
    &H31
      

  2.   

    试过了
    只有tab能能用
      

  3.   

    试试加点间隔时间
    SendMessage xx, &H100, &H49, 0& '按数字1键 
    sleep 100
    SendMessage xx, &H101, &H49, 0& 
      

  4.   

    完整按键消息应该是：WM_KEYDOWN, WM_CHAR, WM_KEYUP
    还有如果是小键盘的 "1"，键值应该是 &H61
      

  5.   

    去网上找一个winio这个东东吧可以做到硬件模拟对于做游戏的按键类外挂很有用