主题：如何在打印前打开打印机窗口

 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" '指定动作

        CurrentTable.PrintSetting() '打开打印机设置对话框

        Proc.Start()