Dim mapIntent As Intent
Dim gURI As String
If latitude.Contains(".") = True And longitude.Contains(".") = True Then
gURI="google.navigation:q=" & latitude & "," & longitude
Else
gURI = "google.navigation:q=" & sAddress
End If
mapIntent.Initialize(mapIntent.ACTION_VIEW, gURI)
mapIntent.SetComponent("googlemaps")
StartActivity(mapIntent)