vbscript - ReportViewer 中的打印预览显示空白屏幕

Question

以下是新页面设置的代码：

Dim newPageSettings As New PageSettings
newPageSettings.Margins = New Margins(20, 20, 20, 20)
newPageSettings.Landscape = True
Dim paperSize As PaperSize = New PaperSize()
paperSize.RawKind = PaperKind.A4
newPageSettings.PaperSize = paperSize
ReportViewer1.SetPageSettings(newPageSettings)
Me.ReportViewer1.RefreshReport()

在我调试系统后，在 ReportViewer 中点击打印预览，屏幕显示如下：

我真的不知道这是怎么发生的。请帮忙。谢谢。

Answer 1

我已经找到了解决上述问题的方法。我没有使用编码来设置打印预览，而是更改了 rdlc 中的报告设置。请参阅下图了解更多信息：