Description: VB to get the coordinates of the mouse pointer, timely mouse coordinates displayed in the window, move the mouse to display the coordinate information in a timely manner, the point through which the mouse is calculated pixel values , the following code is the key to the code:
Private Sub Timer1_Timer ()
Dim point As POINTAPI
GetCursorPos point to get the mouse position
Label1.Caption = "current mouse coordinates:" & point.x & "," & point.y
End Sub
To Search:
File list (Check if you may need any files):
获取鼠标指针坐标\Form1.frm
................\Form1.frx
................\Mdl_folder.bas
................\Module1.bas
................\MSSCCPRJ.SCC
................\工程1.PDM
................\工程1.vbp
................\工程1.vbw
获取鼠标指针坐标
Download