在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中更改报告设置。请参阅下面的图片了解更多信息：