Spanish Leer archivos PDF

Dim FileName As String
Dim i As Intent ' Libreria Phone 
FileName = "carpeta y nombre del fichero.pdf"
i.Initialize(i.ACTION_VIEW, "file://" & FileName)
i.SetType("application/pdf")
StartActivity(i)

        Dim i As Intent 'Libreria Phone
        Dim FileName As String
        FileName = ""carpeta y nombre del fichero.pdf""
        i.Initialize(i.ACTION_VIEW, FileName)
        i.SetType("application/pdf")
        i.WrapAsIntentChooser("Seleccione el visor de PDF")
        StartActivity(i)

Dim FileName As String
    Dim i As Intent ' Libreria Phone
    FileName = "storage\emulated\0\Glosario.pdf"
    i.Initialize(i.ACTION_VIEW, "file://" & FileName)
    i.SetType("application/pdf")
    StartActivity(i)