[原] 小技巧--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工具,可以使用这种方法.