数据报表中纸张页面的横向纵向如何设置

数据报表中纸张页面的横向纵向怎么设置？
求代码，谢谢！

[解决办法]
帮顶……
[解决办法]

VB code

Printer.Orientation = vbPRORLandscape