Dim Intent1 As Intent
Intent1.Initialize(Intent1.ACTION_VIEW, "file://" & File.Combine( Main.PathProyectoActivo & "/", "temp.kml"))
Intent1.SetComponent("android/com.android.internal.app.ResolverActivity")
Intent1.SetType("application/kml")
StartActivity(Intent1)