vba - 如何使用 VBA 将子报表插入到我的报表中

Question

好吧，我有 4 个子报表，它们都有一个数据源。

（Sureport | 数据源）

(subreport1 | Query1) (subreport2 | Query2) (subreport3 | Query3) (subreport4 | Query4)

等等...

当我打开报表时，我想检查 Query1、2、3 和 4 是否存在，并在此基础上将正确的子报表添加到我的主报表中。

我很陌生，不知道从哪里开始。哪个是解决我的问题的最佳方法？

谢谢你。

Answer 1

根据每个子报表的 HasData 属性设置子报表的可见性。

Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
    If Me.Table_subreport.Report.HasData Then
        Me.Table_subreport.Visible = True
    Else
        Me.Table_subreport.Visible = False
    End If
End Sub

Answer 2

最简单的方法是：

Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
    Me.Table_subreport.Visible = Me.Table_subreport.Report.HasData
End Sub