我想打印一报表，而报表模板为WORD格式，但在帮助里却只有打印EXCEL格式模板打印代码，请问我将套用那段代码，应如何修改才不会出错
Dim Book As New XLS.Book(ProjectPath & "Attachments\出库单.xls")
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)
Ws.PrintOut
App.Quit
我的模板文件为：明细单.DOC，我把上段代码机械变为“
Dim Book As New XLS.Book(ProjectPath & "Attachments\明细单.DOC")
Dim fl As String = ProjectPath & "Reports\明细单.DOC"
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)
Ws.PrintOut
App.Quit
结果运行出错，请问应如何修改呢？
加好友 
发短信
Post By：2015/10/8 13:55:00 [显示全部帖子]
Post By：2015/10/8 14:53:00 [显示全部帖子]
此主题相关图片如下：qq图片20151008143408.png
