Question

即使将我的方向改为横向，我也会收到此错误。

Feepurpose.Orientation = rptOrientLandscape
Feepurpose.Show

我设置了

的属性

LeftMargin - 1440 RightMargin - 1440 ReportWidth - 8655 纸宽 - 10800

我正在使用VB6 Service Pack 6

Answer 1

设置leftmargin，rightmargin，topmargin，top，Right，Left to Zero。

Answer 2

当您将鼠标移动到“报告区域”的右侧时，您会发现一个图标，它是一个“左右箭头的垂直线”，当您将鼠标移动到“报告”的底部时区域“你会发现一个图标，它是一个带有向上和向下箭头的水平线”。只需调整布局并保存报告，看它是否有效。

Answer 3

我的问题通过删除report.refresh函数得以解决。

        Set report.DataSource = myRS
        report.BottomMargin = 0
        report.LeftMargin = 0
        report.RightMargin = 0
        report.TopMargin = 0
        '------ report.refresh 
        report.Show

Answer 4

Set borderstyle = 4

4 =用于报告的vbfixedToolWindow，它应该可以正常工作

VB 6 SP6数据报告中的报告宽度大于纸张宽度误差

4 个答案: