Disegnare un mirino come cursore del mouse su una MapView

E' possibile disegnare un mirino come cursore del mouse, quando ci si sposta su una MapView e mostrare la latitudine e la longitudine corrispondente al centro del mirino.
Si farà uso della "DrawingArea", Oggetto "Figlio" di un "Panel", "Figlio" quest'ultimo a sua volta dell'Oggetto "MapView":

MapView
⬇ padre di un
Panel
⬇ padre di una
DrawingArea

Mostriamo di seguito un codice esemplificativo:

Private mp As MapPoint = MapPoint(41.8903, 12.492255)
Private DrawingArea1 As DrawingArea
 
 
Public Sub Form_Open()
 
 Dim pn As Panel
 
 Me.Mouse = Mouse.Blank
 
 With MapView1.Map
   .AddTile("GoogleMap", "https://mt0.google.com/vt/lyrs=s&hl=&x={x}&y={y}&z={z}")
   .Zoom = 15
' Imposta il centro della mappa:
   .Center = mp
 End With
 
' Individua dapprima l'Oggetto "Figlio" della "MapView", che è un "Panel":
 pn = MapView1.Children[0]
' Quindi individua l'Oggetto "Figlio" del "Panel", che è una "DrawingArea":
 DrawingArea1 = pn.Children[0]
  
End
 
Public Sub MapView1_MouseMove()
 
 Dim pt As New Point(Mouse.X, Mouse.Y)
 Dim lat As Float = MapView1.Map.PixelToMapPointRel(pt).Lat
 Dim lon As Float = MapView1.Map.PixelToMapPointRel(pt).Lon
 
 mp = MapPoint(lat, lon)
 
 Me.Text = "Lat. " & Format(lat, "0.######") & "  -  Lon. " & Format(lon, "0.######")
 
 MapView1.Refresh
 MapView1.Map.Refresh
 
End

Public Sub MapView1_Draw()
 
 Dim c, x, y, r, px, py As Short
 Dim w, h As Byte
 Dim po As Point = MapView1.Map.MapPointToPixelRel(mp)
 
 With Paint
' Disegna sull'Oggetto "Figlio" del "Panel", che è una "DrawingArea", la stessa che la Classe "MapView" usa per mostrare la mappa:
   .Begin(DrawingArea1)
   .Brush = .Color(Color.DarkOrange)
   .LineWidth = 2.0
   .Arc(MapView1.Map.MapPointToPixelRel(mp).X, MapView1.Map.MapPointToPixelRel(mp).Y, 50, 0, 360, False)
   .Arc(MapView1.Map.MapPointToPixelRel(mp).X, MapView1.Map.MapPointToPixelRel(mp).Y, 30, 0, 360, False)
   .Stroke
   .Brush = .Color(Color.Red)
   .Arc(MapView1.Map.MapPointToPixelRel(mp).X, MapView1.Map.MapPointToPixelRel(mp).Y, 1.5, 0, 360, False)
   .Fill
   
   r = 50
   x = po.X
   y = po.Y
   
   For c = 0 To 360 Step 90
     po.X = x + r * Cos(Rad(c)) 
     po.Y = y + r * Sin(Rad(c))
     mp = MapView1.Map.PixelToMapPointRel(po)
     Select Case c
       Case 0
         px = po.X - 30
         py = po.Y
         w = 30
         h = 2
       Case 90
         px = po.X 
         py = po.Y - 30
         w = 2
         h = 30
       Case 180
         px = po.X 
         py = po.Y
         w = 30
         h = 2
       Case 270
         px = po.X 
         py = po.Y
         w = 2
         h = 30
     End Select
     .DrawRect(px, py, w, h, Color.Red, 1)
   Next
   .End
 End With
 
End