主题：[求助]报表打印问题

窗口中设计了一个打印按钮，编辑代码如下：

Dim Book AsNew 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" '指定动作
Proc.Start()

打印完成后excel窗口不能自动关闭，我要怎么办？？