'Get Cursor Position using GetCursorPos API

by Karthikeyan (187 Submissions)
Category: Windows API Call/Explanation
Compatability: Visual Basic 5.0
Difficulty: Unknown Difficulty
Originally Published: Tue 23^rd January 2001
Date Added: Mon 8^th February 2021
Rating: (1 Votes)

API Declarations
X As Long Y As Long End Type Private Declare Function GetCursorPos Lib "user32.dll" (xyPoint As POINT_TYPE) As Long

Rate 'Get Cursor Position using GetCursorPos API



'http://www.geocities.com/marskarthik
'http://marskarthik.virtualave.net
'Email: [email protected]

Private Sub Form_Load()
Timer1.Enabled = True
Timer1.Interval = 5
End Sub

Private Sub Timer1_Timer()
Dim cp As POINT_TYPE
Dim rval As Long
rval = GetCursorPos(cp) ' Get cursor location
Label1.Caption = "The mouse is at X=" & cp.X & " Y=" & cp.Y
End Sub

Download this snippet Add to My Saved Code

'Get Cursor Position using GetCursorPos API Comments

No comments have been posted about 'Get Cursor Position using GetCursorPos API. Why not be the first to post a comment about 'Get Cursor Position using GetCursorPos API.

'Get Cursor Position using GetCursorPos API

'Get Cursor Position using GetCursorPos API Comments

Post your comment

Difficulty