在VB的DataReport加了横向的12个标签和12个文本框,打印预览就出现"报表宽度大于纸宽度",我想应该是设横向打印预览吧,但又不知道设置那个属性或方法,也可能不用或用其它方法,请各位大哥帮帮忙!

解决方案 »

  1.   

    横向打印属性:
    Private Sub DataReport_Initialize()
      DataReport1.Orientation = rptOrientLandscape
    End Sub打印宽度(DataReport1.ReportWidth)=纸张宽度-(左边距+右边距)上下左右边距:
    DataReport1.BottomMargin
    DataReport1.LeftMargin
    DataReport1.RightMargin
    DataReport1.TopMargin1厘米=567堤
      

  2.   

    to vbman2003(家人):
        怎么我的VB没有Datareprot1.orientation这个属性显示出来呢?
      

  3.   

    没有?
    打VBsp6补丁试试
      

  4.   

    to vbman2003(家人):
        怎么我的VB没有Datareprot1.orientation这个属性显示出来呢,显示错误为"未找到该方法及数据成员"
      

  5.   

    好的,我试一下,不过以前试过好像搞得DATA控件用不了
      

  6.   

    见贴
    http://community.csdn.net/Expert/topic/3142/3142923.xml?temp=.5762445
      

  7.   

    对了 抓取到网格 勾掉 可以调节报表里面的 LABEL TEXT