VB.NET

VB.NET RSS

How can I get Mouse Position?

Please support our VB.NET advertiser: $4.95 a Month - ASP.NET Web Hosting – Click Here!

•

Join Date: Sep 2004

Posts: 2

Reputation: vbpro is an unknown quantity at this point

Solved Threads: 0

vbpro

Offline

Newbie Poster

How can I get Mouse Position?

Sep 28th, 2004

How can I get the Mouse Position from the mousemove event inthe VB.net?

I can't find out how to do this.. :rolleyes:

•

Join Date: Oct 2004

Posts: 2

Reputation: Mr.Stupid is an unknown quantity at this point

Solved Threads: 0

Mr.Stupid

Offline

Newbie Poster

Re: How can I get Mouse Position?

Oct 18th, 2004

•

Originally Posted by vbpro

How can I get the Mouse Position from the mousemove event inthe VB.net?

I can't find out how to do this.. :rolleyes:

 Help with Code Tags 
 VB.NET Syntax (Toggle Plain Text) 
  Private Sub Form1_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles MyBase.MouseMove
 
        Label1.Text = "X." & e.X & vbCrLf & "Y." & e.Y
 
    End Sub
  Private Sub Form1_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles MyBase.MouseMove

        Label1.Text = "X." & e.X & vbCrLf & "Y." & e.Y
        
    End Sub

•

Join Date: Jul 2007

Posts: 1

Reputation: Benuz is an unknown quantity at this point

Solved Threads: 0

Benuz

Offline

Newbie Poster

Re: How can I get Mouse Position?

Jul 5th, 2007

•

Originally Posted by Mr.Stupid

Help with Code Tags

VB.NET Syntax (Toggle Plain Text)
  Private Sub Form1_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles MyBase.MouseMove
 
        Label1.Text = "X." & e.X & vbCrLf & "Y." & e.Y
 
    End Sub
Private Sub Form1_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles MyBase.MouseMove Label1.Text = "X." & e.X & vbCrLf & "Y." & e.Y End Sub

hi,
but these code above only works inside the form.

how to get the mouse coordinates / position by using VB2005.NET in anywhere?

•

Join Date: Mar 2007

Posts: 21

Reputation: iTaChi is an unknown quantity at this point

Solved Threads: 2

iTaChi

Offline

Newbie Poster

Re: How can I get Mouse Position?

Jul 16th, 2007

you cant get the coordinates of the pointer outside the form..

if you wish to.. customize windows!! :lol:

"If you understand, you can learn anything"

http://www.cprogrammingdock.serverspeople.net

•

Join Date: Apr 2005

Posts: 16,007

Reputation: jbennet is a name known to all

Solved Threads: 513

jbennet

Offline

Moderator

Re: How can I get Mouse Position?

Jul 16th, 2007

you would need to use DirectX or something for that

If i am helpful, please give me reputation points.

•

Join Date: Feb 2007

Posts: 2,070

Reputation: debasisdas will become famous soon enough

Solved Threads: 124

debasisdas debasisdas is offline

Offline

Postaholic

Re: How can I get Mouse Position?

Jul 19th, 2007

do you want to trap mouse co-ordinates any where on the screen ?

Share your Knowledge.

•

Join Date: Apr 2005

Posts: 16,007

Reputation: jbennet is a name known to all

Solved Threads: 513

jbennet

Offline

Moderator

Re: How can I get Mouse Position?

Jul 19th, 2007

yes

If i am helpful, please give me reputation points.

•

Join Date: Jul 2007

Posts: 1

Reputation: Skullmagic is an unknown quantity at this point

Solved Threads: 0

Skullmagic Skullmagic is offline

Offline

Newbie Poster

Re: How can I get Mouse Position?

Jul 25th, 2007

 Help with Code Tags 
 VB.NET Syntax (Toggle Plain Text) 
Dim MyPointAPI As POINTAPI
Private Type POINTAPI
  X As Long
  Y As Long
End Type
 
Private Declare Function GetCursorPos Lib "user32" (lpPoint As POINTAPI) As Long
 
Public Sub Timer1_Timer()
  l = GetCursorPos(MyPointAPI)
  Label1.Caption = CStr(MyPointAPI.X) & ", " & CStr(MyPointAPI.Y)
End Sub
Dim MyPointAPI As POINTAPI
Private Type POINTAPI
  X As Long
  Y As Long
End Type

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

Public Sub Timer1_Timer()
  l = GetCursorPos(MyPointAPI)
  Label1.Caption = CStr(MyPointAPI.X) & ", " & CStr(MyPointAPI.Y)
End Sub

Last edited by Skullmagic; Jul 25th, 2007 at 5:38 am. Reason: Don't look good!!!

•

Join Date: Jul 2007

Posts: 24

Reputation: blondie.simon is an unknown quantity at this point

Solved Threads: 0

blondie.simon blondie.simon is offline

Offline

Newbie Poster

Re: How can I get Mouse Position?

Jul 25th, 2007

I have not been using VB for very long but this is how I have been getting the mouse postion on the screen.

 Help with Code Tags 
 VB.NET Syntax (Toggle Plain Text) 
 Dim MousePosition As Point
        MousePosition = Cursor.Position
 Dim MousePosition As Point
        MousePosition = Cursor.Position

I hope this helps

•

Join Date: Feb 2009

Posts: 2

Reputation: WarMacre is an unknown quantity at this point

Solved Threads: 0

WarMacre

Offline

Newbie Poster

Re: How can I get Mouse Position?

#10

Feb 20th, 2009

I know this thread is old, but I'm confused as to why so many people think this impossible, at least without using an API.

blondie.simon was on the right tracks.

Here's how:

 Help with Code Tags 
 VB.NET Syntax (Toggle Plain Text) 
dim mousePos as point = me.mouseposition
 
dim mousePosX as integer = form1.mouseposition.x
dim mousePosY as integer = form1.mouseposition.y
dim mousePos as point = me.mouseposition

dim mousePosX as integer = form1.mouseposition.x
dim mousePosY as integer = form1.mouseposition.y

Simples see!

And to capture the location when the mouse is moving:

 Help with Code Tags 
 VB.NET Syntax (Toggle Plain Text) 
Private Sub mouseMove_Capture(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles _ 
MyBase.MouseMove
        Dim mousePos As point= Me.MousePosition
End Sub
Private Sub mouseMove_Capture(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles _ 
MyBase.MouseMove
        Dim mousePos As point= Me.MousePosition
End Sub

Note, that the above only functions when the mouse is not over any other form object, but the form itself. It is possible to only capture the mouse movement within a single object too, like a label or picture box for example.