Question

我正在VB .NET中编写一个报告（使用Active Reports），显示有关位置的详细信息，然后显示一组存储在数据库中的图像。图像通过子报告显示在我的主报告中。

然而，我无法加载图像。我有两个文件，主要报告（rptMain）和图像子报告（rptSubImages）。 rptSubImages中的子Detail1_Format永远不会运行，这就是图像没有出现的原因，我无法弄清楚原因！我已经包含了下面的代码......任何人都可以找出为什么我的子报告详细信息部分没有被调用？ rptSubImages报告被初始化，但是如果我在详细信息子中放置一个停止点，它就不会在调试期间被捕获。

以下是代码：

rptMain：

Imports DataDynamics.ActiveReports 
Imports DataDynamics.ActiveReports.Document 
Imports System.Data
Imports System.Data.OleDb

Public Class rptMain
    Private rpt As rptSubImages

    Private Sub rptMain_ReportStart(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.ReportStart

    End Sub

    Private Sub Detail1_Format(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Detail1.Format
        Me.SubReport2.Report = rpt

        Dim cmd As New OleDbCommand("rptMain")
        cmd.Parameters.Add("@LocationID", OleDbType.Integer).Value = locationID

        Windows.Forms.Cursor.Current = Cursors.WaitCursor

        Dim dsLocationInfo As DataSet = objPlugIn.GetProcDataset(cmd, Aquifer.PlugIn.DataFormat.Compressed)


        '--image
        Dim dtImage As DataTable = dsLocationInfo.Tables(1)
        If dtImage.Rows.Count > 0 Then
            rpt = New rptSubImages
            SubReport2.Report = rpt
            SubReport2.Report.DataSource = dtImage
        End If
    End Sub
End Class

rptSubImages：

Imports DataDynamics.ActiveReports 
Imports DataDynamics.ActiveReports.Document 

Public Class rptSubImages 
    Public Sub New()
        InitializeComponent()
    End Sub

    Private Sub Detail1_Format(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Detail1.Format
        'some text
    End Sub
End Class

Answer 1

解决了我自己的问题:)我碰到了创建的部分并设置了子报告的值从Detail_Format中出来并把它放在rptMain的ReportStart中，瞧，它加载了:)我只是把它放在了主要的错误部分形成！

Answer 2

您可以在此处获取有关SubReports的更多信息：

http://blogs.gcpowertools.co.in/2011/09/how-to-control-sub-report-from-parent.html

将子报表添加到Active Reports

2 个答案: