主题：[求助]excel报表可以直接打印而不需要预览吗

 可以这样：

Dim tmp As String = ProjectPath & "Attachments\发货单.xls"
Dim rpt As String = ProjectPath & "Reports\发货单.pdf"
Dim Book As New XLS.Book(tmp)

Book.Build(tmp)

Dim Proc As New Process
Proc.File = tmp
Proc.Verb = "Print" '指定动作
Proc.Start()

参考：

http://www.foxtable.com/help/topics/0353.htm