[原] 小技巧--access浏览PDF文件的2种方法

在VBA的开发中,有时需要浏览PDF文件,有2种方法可以使用

方法1.  使用SHELL

Private Sub btnReadPDF_Click()
    Dim RetVal As String
    RetVal = Shell("C:\Program Files\Adobe\Acrobat 7.0\Reader\AcroRd32.exe D:\test.pdf", 1)
End Sub

其中,
"C:\Program Files\Adobe\Acrobat 7.0\Reader\AcroRd32.exe"是PDF工具的路径,
"D:\test.pdf"是要打开的文件名,
"1"为窗体打开的模式为普通模式

方法2.  使用FollowHyperlink

Private Sub btnReadPDF_Click()
    FollowHyperlink ("D:\test.pdf")
End Sub

如果不知道用户使用的为何种PDF工具,可以使用这种方法.