主题：[求助]帮修改一下代码

            Dim Book As New XLS.Book(ProjectPath & "Attachments\生产计划单.xls")

            Dim fl As String = ProjectPath & "Reports\生产计划单.xls"

            Book.Build() '生成细节区

            Dim Proc As New Process '打开工作簿

            Proc.File = fl

            Proc.Verb = "Print" '指定动作

            Proc.Start()

求帮修改一下代码，要求如下：

1。指定到名为 TSC TTP-342 Pro (副本 1) 的打印机

2。打印前不显示工作表就直接打印