Ecco un esempio valido per tracciare un percorso, qui metto solo 2 punti statici ma possibile creare la versione dinamica in base hai punti che si ha a disposizione.
Sub mapgeo
Dim MapIntent As Intent
Dim Selection As String
Dim Lat1,Lat2,Lon1,Lon2 As String
Lat1 = "51.12345"
Lon1 = "6.12345"
Lat2 = "51.54321"
Lon2 = "6.54321"
Selection = "
http://maps.google.com/maps?saddr=" & Lat1 & "," & Lon1 & "&daddr=" & Lat2 & "," & Lon2
MapIntent.Initialize(MapIntent.ACTION_VIEW, Selection)
StartActivity(MapIntent)
End Sub