主题：GetCursorPos【获当前鼠标位置】如何实现

Private Declare Function GetCursorPos Lib "user32" (lpPoint As PointAPI) As Long

Private Type PointAPI
      X As Long
      Y As Long
End Type

使用：

Dim ScreenPoint As PointAPI
GetCursorPos ScreenPoint

网络上找的。狐表里面不会用 求助各位大神