当前位置:编程学习 > VB >>

[求助]VB找寻滑鼠座标后自动对那位置连点不影响滑鼠移动

--------------------编程问答-------------------- 发消息
SendMessage 目标窗口句柄,WM_MBUTTONDOWN,1,屏幕坐标
屏幕坐标为一个32位数值
低16位为 X 的坐标, 高16位为 Y 的坐标
如 X 为 387,Y 为 243,这样处理
Dim XYCur as Currency
Dim XYLong As Long
Dim X As Currency
DIm Y as Currency
X = 387
Y = 243
XYCur = Y
XYCur = XYCur * (2^16)   '向左偏移16位
XYCur = XYCur Or X
XYLong = CLng(XYCur)

'或者直接用16进制字符串的方法处理
XYLong = CLng("&H" & String(4-len(hex(Y)),"0") & hex(Y)& _
                     String(4-len(hex(X)),"0") & hex(X))
SendMessage hWnd,WM_LBUTTONDOWN,1,XYLong
SendMessage hWnd,WM_LBUTTONUP,1,XYLong --------------------编程问答-------------------- 回覆楼上
这个我要把游标放到387,243才有反应
我是想自动按下387,243这个位置
可以继续教我怎做? --------------------编程问答-------------------- 頂帖.......... --------------------编程问答-------------------- 上面我说的 XYLong 就是你要指定的坐标信息
而 SendMessage hWnd,WM_LBUTTONDOWN,1,XYLong 这一句
是向指定窗口发送鼠标左键按下的消息

SendMessage hWnd,WM_LBUTTONUP,1,XYLong 这一句
是向指定窗口发送鼠标左键松开的消息

这样发两个消息就模仿了真实鼠标按下和松开的过程
唯一要搞清楚的就是你的目标窗口句柄 hwnd 这个参数
如果窗口句柄正确,通常都应该可以实现模拟鼠标点击的这一过程

我这有个范例你可以参考一下
http://download.csdn.net/source/2117506 --------------------编程问答-------------------- 那我再試試看吧!多謝樓上! --------------------编程问答-------------------- ding
补充:VB ,  网络编程
CopyRight © 2012 站长网 编程知识问答 www.zzzyk.com All Rights Reserved
部份技术文章来自网络,