Dim in As Intent
in.Initialize("tomtom.intent.action.IMPORT_SINGLE_ROUTE", "")
Dim fileUri As Url 'content resolver library
fileUri.Parse("file://" & File.Combine(...))
in.PutExtra("android.intent.extra.STREAM", fileUri)
in.SetType("application/gps")
in.Flags = 1
StartActivity(in)