Question

VB中横向/纵向打印设置Orientation 属性设计时不可用

Orientation 属性应该在哪里使用

Answer 1

可用代码打开报表前设置，例如

Private Sub Command1_Click()
    With DataReport1
        .Caption = "打印应收款月结单"
        .Orientation = rptOrientDefault    '默认
        .Orientation = rptOrientPortrait   '纵向
        .Orientation = rptOrientLandscape  '横向
        .Sections("Section3").Controls("Label23").Caption = "第%p页 共%P页"
        .Show
    End With
End Sub