' open Pdf Document
Try
Dim in As Intent
in.Initialize(in.ACTION_VIEW, "")
Starter.Provider.SetFileUriAsIntentData(in, PdfFile)
in.SetType("application/pdf")
StartActivity(in)
Catch
MsgboxAsync("It seems that there's not a Pdf viewer application in the device", "Open Document")
Wait For Msgbox_Result (Resultx As Int)
End Try