vb datareport打印问题

[shaoxinghti]

vb datareport打印问题：我将针式打印机设置为纵向的，VB里报表是这样的，我.show是好的，点了左上角打印按钮时，出现的是纵向了，我手工给成纵向的话就可以，能不能直接在打印时把打印机设置成纵向。这个问题解决的话，我给分或钱都可以，QQ：5417412

[Tiger_Zhao]

DataReport 是用当前打印机打印的，试试在报表初始化时设为纵向。

Private Sub DataReport_Initialize()
    Printer.Orientation = vbPRORPortrait
End Sub

[shaoxinghti]

试了，没有用，因为打印机默认设置是纵向的（1），就是VB6.0调用DATAREPORT,并且使用.SHOW后，左上角打印时出现横向了

[Tiger_Zhao]

我记得针打是没有方向设置的，你所谓打印出的“横向”是什么情况？
还有报表的 ReportWidth 属性是否超过纵向纸张的宽度了？

[shaoxinghti]

，这个是报表属性。
如果我打印机设置成横向的话，VB时提示大于（超出）纸张大小，现在只能是设置成纵向，然后在VB跳出打印机属性时，它自动是横向的，我只能再选择纵向，这样就能打印在22*13.97（二等份）纸上。