以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  鼠标左键单击  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=171503)

--  作者:ljh29206
--  发布时间:2021/9/1 11:27:00
--  鼠标左键单击
 需要做一个自动化的按键助手

想判断 是否的左键 是否出现 单击 (以windows桌面为全局界面)

请教如何判断

网上找的这个代码

全局定义
Public Declare Function GetAsyncKeyState Lib "user32" (ByVal vkey As Long) As Integer

计时器写入

If GetAsyncKeyState(&H201) < 0 Then
Dim x =System.Windows.Forms.Cursor.Position.X.ToString()
Dim y = System.Windows.Forms.Cursor.Position.Y.ToString()
MessageBox.Show(x  & "," & y)
End If

不起作用,

请教如何对应,谢谢

--  作者:有点蓝
--  发布时间:2021/9/1 11:41:00
--  
我也不懂