如何在水晶报表中添加子报表 [英] How to add subreport in crystal reports
问题描述
我在水晶报表设计中添加了子报表。也在代码隐藏文件中我添加了代码来打开子报表...但是当我运行我的应用程序时,它在下面的行中给出了空引用异常:
Report.OpenSubreport(SubReport1)。SetDataSource(dsNowMST)
以下是添加子报告的代码的一部分:
I have added subreport in crystal report design..Also In code behind file I have added code to open subreport...But when I run my application,it gives me null reference exception at the below line:
"Report.OpenSubreport("SubReport1").SetDataSource(dsNowMST)"
Below is a part of code to add subreport:
Dim dsNowMST As New dsNowMST()
da = New Odbc.OdbcDataAdapter(BDRSql, Con)
da.Fill(dsNowMST, "commNowMst")
Report.OpenSubreport("SubReport1").SetDataSource(dsNowMST)
可以任意1请帮助我..这是我第一次使用子报告...
Can any1 please help me..this is the first time I am working with sub reports...
推荐答案
如下所示。
Hi,
try like below.
Dim subreportName As String
Dim subreportObject As SubreportObject
Dim subreport As New ReportDocument()
If TypeOf (Report.ReportDefinition.ReportObjects. _
Item("SubReport1")) Is SubreportObject Then
subreportObject = Report.ReportDefinition.ReportObjects. _
Item("SubReport1")
subreportName = subreportObject.SubreportName
subreport = Report.OpenSubreport(subreportName)
Dim dsNowMST As New dsNowMST()
da = New Odbc.OdbcDataAdapter(BDRSql, Con)
da.Fill(dsNowMST, "commNowMst")
subreport.SetDataSource(dsNowMST)
End If
参考 MSDN [< a href =http://msdn.microsoft.com/en-us/library/ms225975(v=vs.80).aspx\"target =_ blanktitle =New Window> ^ ] < br $> b $ b
希望它有效。
refer MSDN[^]
hope it works.
这篇关于如何在水晶报表中添加子报表的文章就介绍到这了,希望我们推荐的答案对大家有所帮助,也希望大家多多支持IT屋!