Foxtable(狐表)用户栏目专家坐堂 → 怎么写WORD报表代码?


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

主题:怎么写WORD报表代码?

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2019/6/14 12:12:00 [显示全部帖子]

判断当前行的值,然后调用不同模板,如

 

Dim r As Row = Tables("表A").current

If (r("工资序列") = "xxx" orelse r("工资序列") = "yyy") andalso r("起算时间") = nothing then

 

ElseIf 其它条件

 

ElseIf 其它条件

 

End If

 


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2019/6/14 15:41:00 [显示全部帖子]

删除后面的这句代码(保留第一行的)

 

Dim r As Row = Tables("退休人员信息").current

 


 回到顶部