主题：请教excel报表关联表的细节区定义

A（父表）－B（子表），excel报表需要定义子表两个细节区，

 

<表A>

<表B>

<表B>

<表A>

 

这种形式是否正确?

 

 

此主题相关图片如下：snap009.jpg

第五行至第八行，一共四行 都属于表C的细节区

请老师给看看

 

此主题相关图片如下：snap003.png

 

难道是一个关联表只能有一个细节区？

 

 例子：

 

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:test.rar

 楼主，你这种需求用模板是实现不了的。

 只能通过写代码完成。上传个例子帮你弄一下。

 参考这个 http://www.foxtable.com/help/topics/1955.htm

啊，太好了，谢谢！我看看先！！

例子在3楼!

代码在报表事件里，修改了模板。注意看。

 

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:test_01.zip

好的，谢谢 lin_hailun !  问题解决了。

 

不好意思,我又回来了,代码似乎有点问题,结果是错乱的.我改成下面这样,还是错乱的。不知何故。。。

 

Select Case e.Book.TempLate
    Case "经销商调查表"
        Dim drs As List(Of DataRow) = e.DataRow.GetChildRows("附属信息")
        Dim i As Integer = 1
        Dim max As Integer = drs.Count
        For Each dr As DataRow In drs
            If i > max OrElse i > 3 Then
                Exit For
            End If
            e.Book.Marks("授权品牌" & i) = dr("授权品牌")
            e.Book.Marks("改装厂" & i) = dr("改装厂")
            i = i + 1
        Next
End Select

 

 呵呵，不好意思，代码是有欠考虑。

Select Case e.Book.TempLate
    Case "经销商调查表"
        Dim drs As List(Of DataRow) = e.DataRow.GetChildRows("附属信息")
        For i As Integer = 1 To 3
            If i <= drs.Count Then
                e.Book.Marks("授权品牌" & i) = drs(i-1)("授权品牌")
                e.Book.Marks("改装厂" & i) = drs(i-1)("改装厂")
            Else
                e.Book.Marks("授权品牌" & i) = ""
                e.Book.Marks("改装厂" & i) = ""
            End If
        Next
End Select