我设置了两个菜单,用了输出已设置好的模板,增加了代码,为什么是没反映,如果把项目关闭后重启,可以生成报表 1,然后关闭再输出,没反应,同时,输出报表2,也是同样的问题,只能关闭才能打开用一次。请指正。
MainTable = Tables("人员表")
XLS.Reports("报表1").Build() '生成报表
和
MainTable = Tables("单位表")
Dim tm As String = ProjectPath & "Attachments\报表2.doc" '指定模板文件
Dim fl As String = ProjectPath & "Reports\报表2.doc" '指定目标文件请
Dim wrt As New WordReport(Tables("单位表"),tm,fl) '定义一个WordReport
wrt.Build() '逐行生成报表
wrt.Show() '显示报表