非常简单的代码将鼠标坐标放在文本框中

Very simple code to put the mouse coords in a text box

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

经过测试，