Question

VB发送后台按键消息

看了大部分网站还是觉得这个比较棘手，希望有高手放段核心代码出来给我们后辈研究研究。我知道按键精灵可以实现，但是自己做出来的自己要修改也很简单。大部分游戏都可以用sendkeys "" 来实现发送按键消息，而不能实现后台。我看了按键精灵的 他的也跟sendkeys差不多，不过他多调用了一个插件，VB可以做吗？比如自己写个函数。sendkeys (hwnd,"z") 向目标窗体发送按键 “Z”。这样的函数或者插件VB可以不啊？

Answer 1

Public Declare Function PostMessage Lib "user32" Alias "PostMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As Long) As LongPublic Declare Function SendKeys(ByVal hwnd As long,ByVal keycode as long)
PostMessage hwnd,256,keycode,0
End function这样就可以调用（你可以用计算器的窗口句柄试一下）：SendKeys(hWnd,asc("1"));