vb.net后台鼠标 vbs控制鼠标点击

高分求助！vb.net 如何全局判断鼠标是否单击

你这问题说的有点没太明白是在form上判断是否是鼠标单击么?

创新互联公司是一家专业提供黑龙江企业网站建设,专注与成都网站制作、成都做网站、HTML5建站、小程序制作等业务。10年已为黑龙江众多企业、政府机构等服务。创新互联专业的建站公司优惠进行中。

还是说在后台判断是否是鼠标单击了

如果是第一种的话应该是有事件的直接写进去你要写的方法就好了

如果要是在后台判断的话就定义一个全局变量然后在你from上所有的你需要判断的空间上都加上mouseclick事件中再给全局变量赋值就能判断是否是鼠标单击了

调用api

在Visual Baisc.net中的声明：

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)

Public Const MOUSEEVENTF_LEFTDOWN = H2 '模拟鼠标左键按下

Public Const MOUSEEVENTF_LEFTUP = H4 ’模拟鼠标左键释放

Public Const MOUSEEVENTF_MIDDLEDOWN = H20 '模拟鼠标中间键按下

Public Const MOUSEEVENTF_MIDDLEUP = H40 '模拟鼠标中间键释放

Public Const MOUSEEVENTF_RIGHTDOWN = H8 '模拟鼠标右键按下

Public Const MOUSEEVENTF_RIGHTUP = H10 '模拟鼠标右键释放

Public Const MOUSEEVENTF_MOVE = H1 '模拟鼠标指针移动

例：

mouse_event MOUSEEVENTF_LEFTDOWN,10,10,0,0

'在（10，10）模拟鼠标左键按下

直接把消息发送给TextBox。

Dim x As Integer, y As Integer

x = 100

y = 100

PostMessage(TextBox1.Handle.ToInt32, WM_LBUTTONDOWN, MK_LBUTTON, MakeInteger(x, y))

PostMessage(TextBox1.Handle.ToInt32, WM_LBUTTONUP, MK_LBUTTON, MakeInteger(x, y))

分享标题：vb.net后台鼠标 vbs控制鼠标点击
本文链接：http://myzitong.com/article/hhheoe.html