Ottenere le coordinate geografiche dei punti sulla mappa sui quali si passa con il puntatore del mouse

Per ottenere le coordinate geografiche sui punti della mappa, sui quali si passa, si scorre con il puntatore del mouse, non è necessario tenere premuto un tasto del mouse durante il suo spostamento, e si dovrà utilizzare l'Evento "_MouseMove()" della Classe MapView.

Mostriamo un esempio pratico:

Private MapView1 As MapView


Public Sub _new()
 
 With Me
   .W = Screen.AvailableWidth
   .H = Screen.AvailableHeight
   .Arrangement = Arrange.Fill
 End With

 MapView1 = New MapView(Me) As "MapView1"
 
End 

Public Sub Form_Open()
 
 With MapView1.Map
  .AddTile("Open Topo", "https://a.tile.opentopomap.org/{z}/{x}/{y}.png")
  .Zoom = 15
  .Center = MapPoint(41.89018, 12.49230)
End With
 
End

Public Sub MapView1_MouseMove()

 Dim pt As New Point(Mouse.X, Mouse.Y)
 Dim mp As MapPoint = MapView1.Map.PixelToMapPointRel(pt)
 
 Me.Title = "Lat. = " & Format(mp.Lat, "#.000000") & "   " & "Lon. = " & Format(mp.Lon, "#.000000")
 
End