Foxtable(狐表)用户栏目专家坐堂 → 打印WORD报表代码


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

主题:打印WORD报表代码

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


加好友 发短信
等级:小狐 帖子:391 积分:3179 威望:0 精华:0 注册:2008/8/31 20:44:00
打印WORD报表代码  发帖心情 Post By:2015/4/18 14:24:00 [显示全部帖子]

打印WORD报表,不显示,直接打印,怎样改?

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

 回到顶部