VB.NET - Координати на мишката

Много прост код за поставяне на координатите на мишката в текстово поле

Private Sub Form1_MouseClick(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseClick
    Dim MPx As Point = MousePosition()
    TextBox1.Text = MPx.ToString

End Sub

изпитано и изпитано,

Вярвам, че търсите събитието mousedown. Имайте предвид, че ако търсите действителни координати на екрана, може да се наложи да извършите и някои изчисления или да използвате Windows API, за да получите бързо координатите.

Можете също да опитате това

Private Sub Form1_MouseClick(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseClick
     TextBox1.Text = e.Location.ToString()
End Sub

Не бих посъветвал

Private Sub Form1_MouseClick(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseClick
     TextBox1.Text = MousePosition().ToString()
End Sub

защото може да се промени, след като първо щракнете върху бутона, защото сте преместили мишката. Така че винаги е по-добре, ако правите изчисление, за да присвоите местоположението на променлива или в случай на e.location това вече е отделна променлива, която не се променя. Това е и причината, поради която е по-добър избор от MousePosition, тъй като позицията на мишката ще се променя постоянно, докато е в тази функция за щракване, а не e.location ще остане същата, докато напусне събитието mouseclick.