如题 ?

Dim Book As New XLS.Book(ProjectPath & "Attachments\\申请书.xls")
Dim fl As String = ProjectPath & "Reports\\申请书.xls"
Book.Build() \'生成细节区
Book.Save(fl) \'保存工作簿
Dim Proc As New Process \'打开工作簿
Proc.File = fl

Proc.Verb = "Print" \'  直接打印   如何设置为指定打印机打印（窗口打印可以设置指定打印机，就是不知EXCEL报表如何设置                

                    Doc.PrinterName = "EPSON LQ-730K ESC/P2"  指定了打印机
                    doc.Print()    ’窗口打印