Foxtable(狐表)用户栏目专家坐堂 → 设置条件打印报表问题


  共有2138人关注过本帖树形打印复制链接

主题:设置条件打印报表问题

帅哥哟,离线,有人找我吗?
aza520
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:689 积分:5155 威望:0 精华:0 注册:2017/10/22 10:15:00
设置条件打印报表问题  发帖心情 Post By:2018/1/29 10:28:00 [显示全部帖子]

我有两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() '显示报表


 回到顶部
帅哥哟,离线,有人找我吗?
aza520
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:689 积分:5155 威望:0 精华:0 注册:2017/10/22 10:15:00
  发帖心情 Post By:2018/1/29 11:21:00 [显示全部帖子]

谢谢老师


 回到顶部