VB通过user32模拟击键

Question

我想模拟击键，就像我在点击鼠标时所做的那样，我碰巧在网上找到了一些示例代码。

声明

Public Const MOUSEEVENTF_LEFTDOWN = &H2
Public Const MOUSEEVENTF_LEFTUP = &H4

Declare Function apimouse_event Lib "user32.dll" Alias "mouse_event" (ByVal dwFlags As Int32, ByVal dX As Int32, ByVal dY As Int32, ByVal cButtons As Int32, ByVal dwExtraInfo As Int32) As Boolean

模拟MouseClicks

Call apimouse_event(MOUSEEVENTF_LEFTDOWN, 0, 0, 0, 0)
Call apimouse_event(MOUSEEVENTF_LEFTUP, 0, 0, 0, 0)

以上代码甚至可以在directx应用程序中模拟鼠标单击。是否也有类似的方法来模拟击键？如果你能解释上面的代码做些什么也很好，因为我不太理解它。

Answer 1

当然，您不用使用“鼠标事件”消息，而是使用“键盘事件”。关于一些例子，请看一下事件页面在pinvoke.net。

请记住，它们实际上是模仿用户在键盘上按下键，所以它们总是被发送到带有焦点的控件(“前台”)。如果需要将特定的击键发送到隐藏窗口或背景窗口，则需要查找的是与SendMessage相关的函数。