Чтобы получить положение мыши в Visual Basic, вы можете использовать различные методы. Вот несколько подходов:

1. Метод 1. Использование свойства Cursor.Position:

   Dim mouseX As Integer = Cursor.Position.X
   Dim mouseY As Integer = Cursor.Position.Y

2. Метод 2. Обработка событий Mouse:

   Private Sub Form1_MouseMove(sender As Object, e As MouseEventArgs) Handles MyBase.MouseMove
   Dim mouseX As Integer = e.X
   Dim mouseY As Integer = e.Y
   End Sub

3. Метод 3. Использование функции API GetCursorPos:

   Private Declare Function GetCursorPos Lib "user32" (ByRef lpPoint As Point) As Boolean
   Private Sub GetMousePosition()
   Dim mousePos As Point
   GetCursorPos(mousePos)
   Dim mouseX As Integer = mousePos.X
   Dim mouseY As Integer = mousePos.Y
   End Sub

Эти методы позволяют получить текущую позицию мыши в приложении Visual Basic. Выберите метод, который соответствует вашим конкретным требованиям.