Question

VB打印中关于排版的问题

在vb 打印时，默认的是竖向的排版，怎么才能够进行横向的排版，

若以下回答无法解决问题，邀请你更新回答

Answer 1

实用PRINTER的Orientation 属性可改变打印方向：
Orientation 属性
返回或设置一个值，该值指出文档是以纵向还是横向的方式被打印。在设计时是不可用的。
语法
object.Orientation [= value]
Orientation 属性的语法包含下面部分：
部分 描述
Object 对象表达式，其值是“应用于”列表中的一个对象。
Value 一个决定页方向的值或常数，“设置值”中有详细描述。
设置值
value 的设置值为：
常数 值 描述
VbPRORPortrait 1 文档打印以纸的窄边作顶部。
VbPRORLandscape 2 文档打印以纸的宽边作顶部。
演示代码：
Private Sub Command1_Click()
Printer.Orientation = 2 '设置2为横向，设置1为纵向
Printer.CurrentY = 600
Printer.CurrentX = 600
Printer.FontSize = 20
Printer.Print "问 专 家 "
Printer.EndDoc
End Sub