Dim doc As New PrintDoc
doc.PageSetting.Width = 210 '纸张宽度为100毫米
doc.PageSetting.Height = 297
doc.AutoRotate = False '
Dim rm As prt.RenderEmpty
doc.PageSetting.Landscape = True
Doc.PageSetting.LeftMargin = 5 '设置左边距
Doc.PageSetting.RightMargin = 5 '设置右边距
Doc.PageSetting.TopMargin = 25'设置上边距
Doc.PageSetting.BottomMargin = 5 '设置下边距
老师，我的一个报表，预览能够正常横向显示，但一打印就自动施转成了纵向，我要的是横向，一直这个是个问题，是不是要将表格的长宽固定，自动的好像就要这样，该怎么办？
加好友 
发短信
Post By：2019/2/25 17:10:00 [显示全部帖子]
