我有两WORD报表模板，想在一个按钮中实现有条件生成报表的功能，就是当“表B”的“第一列”有数据时，生成“报表1”，“第一列”没有数据时，生成“报表2”，能实现 吗？其中“表A”与“表B”关联，“表B”是子表。
Dim tm As String = ProjectPath & "Attachments\报表1.doc" '指定模板文件
Dim fl As String = ProjectPath
& "Reports\报表1.doc"
'指定目标文件
Dim wrt As
New WordReport(Tables("表A"),tm,fl) '定义一个WordReport
wrt.Build() '逐行生成报表
wrt.Show() '显示报表
Dim tm As String = ProjectPath & "Attachments\报表2.doc" '指定模板文件
Dim fl As String = ProjectPath
& "Reports\报表2.doc"
'指定目标文件
Dim wrt As New WordReport(Tables("表A"),tm,fl) '定义一个WordReport
wrt.Build() '逐行生成报表
wrt.Show() '显示报表
加好友 
发短信
Post By：2018/1/29 10:28:00 [只看该作者]
