为RDLC 报表分组添加序号

最新推荐文章于 2020-05-26 09:42:49 发布

转载最新推荐文章于 2020-05-26 09:42:49 发布 · 558 阅读

0 ·

CC 4.0 BY-SA版权

原文链接：http://www.cnblogs.com/DiscoverPalace/archive/2013/01/11/2856295.html

文章标签：

#c#

本文介绍了一种在RDLC报表中实现分组序号的方法，通过使用VB代码自定义函数GroupCount，可以为报表中的每一组数据生成连续的序号。此方法适用于需要在报表中显示分组信息并为其分配唯一序号的场景。

RDLC就一个RowNumber的函数能用来做序号，但是往往我们更需要的是分组序号在RDLC中，只能用vb 来写。

代码如下：

Dim count As Integer
Dim GroupName As String
Public Function GroupCount(name As String) As Integer

If (GroupName = "") Then
count = 1
GroupName = name
GroupCount = count
Exit Function
End If

If (GroupName = name) Then
count = count + 1
Else
GroupName = name
count = 1
End If

GroupCount = count

End Function