VB中模仿鼠标动作

Question

第一个：模仿鼠标按下，就是让鼠标在任何地方单击、双击，是否移动实际鼠标不重要，主要是要求不仅仅在程序本身里面。是否可以实现右键单击？三击可以么？ 第二个：模仿鼠标移动，就是让鼠标移动到指定地点，而不经过中间的部分，直接跳过去，怎么做到？ 第三个：模仿鼠标拖动，就是在鼠标左键按下的时候，再移动鼠标，最后松开，如何实现？ 谢谢了，请分开答。

Answer 1

使用API函数mouse_event:
函数如下:
dwFlags常数
意义
MOUSEEVENTF_MOVE
&H1
移动鼠标
MOUSEEVENTF_LEFTDOWN
&H2
模拟鼠标左键按下
MOUSEEVENTF_LEFTUP
&H4
模拟鼠标左键抬起
MOUSEEVENTF_RIGHTDOWN
&H8
模拟鼠标右键按下
MOUSEEVENTF_RIGHTUP
&H10
模拟鼠标右键抬起
MOUSEEVENTF_MIDDLEDOWN
&H20
模拟鼠标中键按下
MOUSEEVENTF_MIDDLEUP
&H40
模拟鼠标中键抬起
MOUSEEVENTF_ABSOLUTE
&H8000
标示是否采用绝对坐标
这样就可以实现你的第一和第二
拖动的原理是
鼠标左键按下-移动到坐标-鼠标左键弹起就可以解决3了