各位老师：有两个问题求助：

  、这个命令我想在打印前能够让暂停一下，在暂停时能看到打印预览，看完没有错误时再进行打印：

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

proc                             \'打印预览
Proc.Verb = "Print"  \'指定动作
Proc.Start()

  请各位老师费心 ~！

1、直接打开Ececl文件，然后点击预览

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

Proc.Start()

2、使用vba

http://www.foxtable.com/webhelp/scr/2121.htm

Dim fl As  String = ProjectPath  &  "Reports\\出库单.xls"

Book.Build() \'生成细节区

Book.Save(fl) \'保存工作簿

Dim App As New MSExcel.Application

Dim Wb As MSExcel.WorkBook = App.WorkBooks.Open(fl)

Dim Ws As MSExcel.WorkSheet = Wb.WorkSheets(1)

App.Visible = True

Ws.PrintPreview

App.Quit