Question

vb怎么获取鼠标的屏幕坐标

Answer 1

函数功能：该函数检取光标的位置，以屏幕坐标表示。
函数原型：BOOL GetCursorPos（LPPOINT lpPoint）；
参数：
IpPoint：POINT结构指针，该结构接收光标的屏幕坐标。
Visual Basic 6.0 函数声明：
[Public/Private] Declare Function GetCursorPos Lib "user32" Alias "GetCursorPos" (lpPoint As POINTAPI) As Long
使用时要先定义一个数据结构：
Public Type POINTAPI
x As Long
y As Long
End Type
例如：
Dim biao as POINTAPI
GetCursorPos biao
那么biao.x用来存放当前光标的x轴坐标,biao.y用来存放当前y轴的坐标。
返回值：如果成功，返回值非零；如果失败，返回值为零。若想获得更多错误信息，请调用GetLastError函数。