对象引用未设置为子报表中对象的实例

Question

我的报告将两份独立报告合并在一起。主报表没有数据源，但两个子报表使用相同的三表数据集。

如何解决运行以下代码时出现的错误？

  

对象引用未设置为对象的实例

objRpt = New rptOVERDET
objRpt.SummaryInfo.Dispose()
objRpt.Subreports("srOverview").SetDataSource(dsDetail)
objRpt.Subreports("srOverview").SummaryInfo.Dispose()
objRpt.Subreports("srOverview").SummaryInfo.ReportComments = "Overview Report" & Trim(strReportHeader) & vbNewLine & Trim(strContactPhone)

objRpt.Subreports("srDetail").SetDataSource(dsDetail)
objRpt.Subreports("srDetail").SummaryInfo.Dispose()
objRpt.Subreports("srDetail").SummaryInfo.ReportComments = "Detail Report" & Trim(strReportHeader) & vbNewLine & Trim(strContactPhone)