请教DataReport的横向打印

请教DataReport的横向打印~~~是如何实现的

解决方案 »

  1.   

    http://cn.codeof.com/articles/programming/vb/271.htm
      

  2.   

    Printer.Orientation   =   2　　　　'设置为横向打印，改为1就是纵向了
      

  3.   

    Printer.Orientation   =   2
    这句是写在哪个位置的啊?是不是在datareport.show的前面,还是写在datareport页里面?
      

  4.   

    Private Sub DataReport_Initialize()
        rpt.Orientation = rptOrientLandscape
    End Sub