Вы также можете попробовать это
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.