vb中怎么获取鼠标的坐标

其实很简单，逐行手敲，亲测可用。

Private Type POINTAPI

X As Long

Y As Long

End Type

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

Private Sub Command1_Click()

Dim Point As POINTAPI

GetCursorPos Point

Print "鼠标横坐标为：" & PointX

Print "鼠标纵坐标为：" & PointY '打印鼠标位置坐标

End Sub

cpoint

酣窢丰喝莶估奉台斧郡pt;

::getcursorpos(&pt);

这样就可以得到当前鼠标的位置了,(ptx,pty)。

要获得鼠标点击时的坐标不用自己获得的，mfc的消息映射函数的参数中有鼠标位置的这个参数的。

Point p = CursorPosition;

pX; //当前X坐标

pY; //当前Y坐标

以上代码在任意地方执行，就可取得鼠标在屏幕上的X Y坐标。

以上就是关于vb中怎么获取鼠标的坐标全部的内容，包括:vb中怎么获取鼠标的坐标、如何获取鼠标点击的坐标、如何获得当前鼠标的屏幕坐标(c#)等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！