主题：如何关闭word报表？在同一界面中反复生成word报表提示错误

参考

Dim tm As String  = ProjectPath & "Attachments\出库单.doc" '指定模板文件
Dim fl As String = ProjectPath & "Reports\出库单.doc" '指定目标文件
Dim wrt As New WordReport(Tables("出库"),tm,fl) '定义一个WordReport
wrt.Build() '逐行生成报表

wrt.Quit

 1、出错的例子发上来测试；

 2、重启一下电脑、重装一下完整版的MS Office