如何实现鼠标自动移动、点击及键盘按钮自动响应？

具体代码大概是这样：b = WaitKey()，If b = 81 Then 就是判断按下了q键，接着进入 Do 循环，Delay 500 延迟一下，key = GetLastClick() 获取上次点击，If key = 32774 Then 说明是右键，然后 for 10 循环执行 RightClick 1，每次 Delay 500，再用 Next 结束，最后 End If 和 Loop 收尾。注意不要用 RightClick 10，因为那样速度太快，你根本看不到效果。另外 32773 表示鼠标按下，key = WaitClick() 则是等待按下任意鼠标键。