Foxtable(狐表)用户栏目专家坐堂 → 连续打印报表的问题


  共有2973人关注过本帖平板打印复制链接

主题:连续打印报表的问题

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


加好友 发短信
等级:小狐 帖子:339 积分:3760 威望:0 精华:0 注册:2017/9/7 15:20:00
连续打印报表的问题  发帖心情 Post By:2019/2/3 17:04:00 [只看该作者]

老师您好!
在专业报表里连续打印的问题我调试了好久都调不好,求帮助啊!
代码如下:

Dim doc As New PrintDoc '定义一个新报表
Doc.PageSetting.LeftMargin = 10 '设置左边距
Doc.PageSetting.RightMargin = 10 '设置右边距
Doc.PageSetting.TopMargin = 5 '设置上边距
Doc.PageSetting.BottomMargin = 2 '设置下边距
doc.PageSetting.Width = 210  '纸张宽度为210毫米
doc.PageSetting.Height = 135  '纸张高度为135毫米
'doc.PageSetting.Landscape = True 
doc.AutoRotate = False
‘以下是主体文本代码...

以上代码生成报表预览的时候,报表设置里,会自动设置为横向,手动更改也不行,不知道是哪里出了问题,
(打印出的效果在二楼)

如果把红色代码注释掉的话,就会默认为A4纸纵向,打印正常!但不能连续啊...


图片点击可在新窗口打开查看此主题相关图片如下:qq图片20190202180254.png
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:qq截图20190202180146.png
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:qq截图20190202181719.png
图片点击可在新窗口打开查看


 回到顶部