设置成只读打开即可。如
Dim f as string = "d:\test.xls"
Dim finfo As New FileInfo(f)
finfo.ReadOnly = True
Dim proc As new Process
proc.file = f
proc.Start
不能用pdf打开excel文件，除非你把excel保存为pdf
Dim fl As String = ProjectPath & "Reports\出库单.pdf"
Dim Book As New XLS.Book(ProjectPath & "Reports\出库单.xls")
Book.SaveToPDF(fl) '保存为PDF文件
Dim Proc As New Process '打开PDF文件
Proc.File = fl
Proc.Start()
[此贴子已经被作者于2016/2/21 10:36:44编辑过]
加好友 
发短信
Post By：2016/2/21 10:36:00 [显示全部帖子]
