如何使用VBA将子报表插入到报表中

时间:2012-06-05 18:03:23

标签: vba ms-access

好吧我有4个子报表都有数据源。

(Sureport |数据源)

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

依旧......

当我打开报告时,我想检查Query1,2,3和4是否存在,并基于此,我将向主报告中添加正确的子报告。

我是新手,我不知道从哪里开始。哪个是解决我问题的最佳方法?

谢谢。

2 个答案:

答案 0 :(得分:3)

根据每个子报表的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

答案 1 :(得分:1)

最简单的方法是:

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