我在单据套打代码中设置了纸张大小，预览时纸张大小与设置的相符，再点击预览窗口中的打印按钮，纸张就变为A4大小了。还要在打印机设置里在重新设置一遍吗？

代码开头部分：

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

doc.PageSetting.Width = 230 \'纸张宽度为100毫米
doc.PageSetting.Height = 127 \'纸张高度为120毫米
Dim rx As prt.RenderText \'定义一个文本对象
Doc.PageSetting.LeftMargin = 19 \'设置左边距
Doc.PageSetting.RightMargin = 20 \'设置右边距
Doc.PageSetting.TopMargin = 24 \'设置上边距
Doc.PageSetting.BottomMargin = 12 \'设置下边距

......

在预览窗口显示纸张大小与设置相符：

此主题相关图片如下：image 1.jpg

点击预览窗口中的打印按钮后：

这个是bug

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=102144&skin=0