type pointapi x as long y as long end type declare function GetCursorPos Lib "user32" (lpPoint As POINTAPI) As Long
private a as pointapisub Timer_timer() getcursorpos a debug.print a.x,a.yend sub
GetCursorPos VB声明 Declare Function GetCursorPos Lib "user32" Alias "GetCursorPos" (lpPoint As POINTAPI) As Long 说明 获取鼠标指针的当前位置 返回值 Long,非零表示成功,零表示失败。会设置GetLastError 参数表 参数 类型及说明 lpPoint POINTAPI,随同指针在屏幕像素坐标中的位置载入的一个结构
Declare Function GetCursorPos Lib "user32" Alias "GetCursorPos" (lpPoint As POINTAPI) As Long 为什么该定义总是出错在引用里面田间USER32.DLL也不行望高手解答,谢谢!
x as long
y as long
end type declare function GetCursorPos Lib "user32" (lpPoint As POINTAPI) As Long
getcursorpos a
debug.print a.x,a.yend sub
Declare Function GetCursorPos Lib "user32" Alias "GetCursorPos" (lpPoint As POINTAPI) As Long
说明
获取鼠标指针的当前位置
返回值
Long,非零表示成功,零表示失败。会设置GetLastError
参数表
参数 类型及说明
lpPoint POINTAPI,随同指针在屏幕像素坐标中的位置载入的一个结构
为什么该定义总是出错在引用里面田间USER32.DLL也不行望高手解答,谢谢!