1.
mouse_event MOUSEEVENTF_LEFTDOWN
mouse_event MOUSEEVENTF_LEFTUP
2.
SendMessage/PostMessage WM_LBUTTONDOWN
SendMessage/PostMessage WM_LBUTTONUP
自己百度下具体怎么用追问
能否给个简单的代码，我在自学，刚学，谢谢
追答自学的话就必须学会怎么用搜索引擎了
追问请问多个相同的类名。比如有五个类名都是4 我想取第三个4的句柄怎么取
追答窗体名(标题文本)也一样吗？
Private Declare Sub mouse_event Lib "user32" (ByVal dwFlags As Long, ByVal dx As Long, ByVal dy As Long, ByVal cButtons As Long, ByVal dwExtraInfo As Long) '
Const MOUSEEVENTF_LEFTDOWN = &H2
Const MOUSEEVENTF_LEFTUP = &H4
Call SetCursorPos(200, 100)
mouse_event MOUSEEVENTF_LEFTDOWN Or MOUSEEVENTF_LEFTUP, 0, 0, 0, 0追问
谢谢 这个了
你好在吗请教个问题
本回答被提问者和网友采纳请问vb如何简单的实现模拟鼠标点击屏幕坐标位置
给你介绍两种方法 1.mouse_event MOUSEEVENTF_LEFTDOWN mouse_event MOUSEEVENTF_LEFTUP 2.SendMessage\/PostMessage WM_LBUTTONDOWN SendMessage\/PostMessage WM_LBUTTONUP 自己百度下具体怎么用
VB 模拟点击窗口中的某一点坐标
1。使用MOUSEEVENTF来模拟，只不过需要算出具体坐标是多少！例如你先要获取窗口在屏幕中的位置然后再换算成实际坐标，这个也是相对坐标的问题 2。使用sendmessage给窗口送一个鼠标消息，消息里带上坐标就可以了
VB中怎样模拟鼠标双击操作?
当然可以啊。使用API函数mouse_event可以模拟鼠标事件，比如左键单击、双击和右键单击等。这个实例利用此函数产生了十分有趣的效果，无论鼠标处于屏幕的任何位置，每隔一秒程序会使鼠标在那个位置单击或双击一次，这会给我们造成什么样的混乱呢？试一试就知道了。先在程序中加入如下的声明后，就能引用mouse_ev...
VB中模仿鼠标动作
拖动的原理是 鼠标左键按下-移动到坐标-鼠标左键弹起就可以解决3了
vbs\/vb如何模拟鼠标点击
'获取鼠标的位置 Dim p As POINTAPI Call GetCursorPos(p)Text1.Text = p.X Text2.Text = p.Y '设置鼠标的光标到坐标(431, 190)位置 ret = SetCursorPos(431, 190)'模拟一个左键单击的事件 mouse_event MOUSEEVENTF_LEFTDOWN Or MOUSEEVENTF_LEFTUP, 0, 0, 0, 0 其它的自己可以对照着api...
vb如何模拟鼠标每隔一段时间自动点击一个固定的位置?
MOUSEEVENTF_ABSOLUTE dx和dy指定鼠标坐标系统中的一个绝对位置。在鼠标坐标系统中，屏幕在水平和垂直方向上均匀分割成65535×65535个单元 MOUSEEVENTF_MOVE 移动鼠标 MOUSEEVENTF_LEFTDOWN 模拟鼠标左键按下 MOUSEEVENTF_LEFTUP 模拟鼠标左键抬起 MOUSEEVENTF_RIGHTDOWN 模拟鼠标右键按下 MOUSEEVENTF_RIGHTUP 模拟...
VB模拟鼠标点击
第一个参数是描述了你鼠标干了什么，具体说明如下 MOUSEEVENTF_ABSOLUTE dx和dy指定鼠标坐标系统中的一个绝对位置。在鼠标坐标系统中，屏幕在水平和垂直方向上均匀分割成65535×65535个单元 - MOUSEEVENTF_MOVE 移动鼠标 MOUSEEVENTF_LEFTDOWN 模拟鼠标左键按下 MOUSEEVENTF_LEFTUP 模拟鼠标左键抬起 MOUSEEVENTF_...
如何获得vb中鼠标在窗口的坐标
方法一: 直接用 MouseDown事件 举例：（这种方法获取的是点的位置在窗体中，却该对象有MouseDown事件才行，其坐标值为所在容器的相对坐标值）Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)If Button = 1 Then Cls Print "X:"; X, "Y:"; Y En...
如何在vb里制作鼠标移动时显示鼠标位置
在窗体上放个标签label1程序运行的时候移动鼠标，在鼠标的位置上显示出鼠标的坐标来。代码如下：Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)Label1.Caption = "x=" & X & "y" & Y Label1.Left = X Label1.Top = Y End Sub ...
VBS脚本里,怎么控制鼠标在屏幕的某个坐标点单击?
'模拟鼠标左键双击（即快速的两次单击）oExcel.Run "mouse_event", MOUSEEVENTF_LEFTDOWN + MOUSEEVENTF_LEFTUP, 0, 0, 0, 0 oExcel.Run "mouse_event", MOUSEEVENTF_LEFTDOWN + MOUSEEVENTF_LEFTUP, 0, 0, 0, 0 '模拟鼠标右键单击 oExcel.Run "mouse_event", MOUSEEVENTF_RIGHTDOWN + ...
