专业报表页面设置AutoRotate 不起作用 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 专业报表页面设置AutoRotate 不起作用

共有2180人关注过本帖树形打印复制链接主题：专业报表页面设置AutoRotate 不起作用

sjzsdu

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：小狐帖子：341 积分：2455 威望：0 精华：0 注册：2014/7/30 18:03:00

专业报表页面设置AutoRotate 不起作用 发帖心情

Post By：2016/2/17 11:29:00 [显示全部帖子]

'定义一个报表,并完成页面设置

Dim doc As New PrintDoc '定义一个报表

doc.AutoRotate = False

doc.PageSetting.Width = 70 '纸张宽度为100毫米

doc.PageSetting.Height = 45 '纸张高度为120毫米

doc.PageSetting.Landscape = False '非横向打印

doc.PageSetting.LeftMargin = 1

doc.PageSetting.RightMargin = 1

doc.PageSetting.TopMargin = 1

doc.PageSetting.BottomMargin = 1

我要做一个标签，标签纸的大小是宽70高45，连续打印的。预览的时候变成了宽45，高70

doc.AutoRotate = False 这句代码不起作用

sjzsdu

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：小狐帖子：341 积分：2455 威望：0 精华：0 注册：2014/7/30 18:03:00

Post By：2016/2/17 12:09:00 [显示全部帖子]

doc.PageSetting.Landscape = true 后

显示是正常了，但是打印出来的字的方向不对了

打出来的内容跨页了

sjzsdu

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：小狐帖子：341 积分：2455 威望：0 精华：0 注册：2014/7/30 18:03:00

回复：（大红袍）试试 doc.PageSetting.Land... 发帖心情

Post By：2016/3/3 10:19:00 [显示全部帖子]

打印机设置了，还是不行呢

autorotate没有起作用啊

是个问题

主题：专业报表页面设置AutoRotate 不起作用