1、RDLC报表表格中添加序号,调用表达式RowNumber( Nothing )
2、RDLC报表,表格分组后添加序号,分两种情况
第一种情况,在分组内添加从1开始的序号,每个分组内都是从1开始计数。
在报表属性-》代码中添加如下代码:
1 Dim count As Integer 2 Dim GroupName As String 3 Public Function GroupCount(name As String) As String 4 5 If (GroupName = "") Then 6 count = 1 7 GroupName = name 8 GroupCount = count 9 Exit Function 10 End If 11 12 If (GroupName = name) Then 13 count = count + 1 14 GroupCount = count 15 Else 16 count = 1 17 GroupName = name 18 GroupCount = count 19 Exit Function 20 End If 21 22 End Function
然后在需要添加序号的表格中添加表达式=Code.GroupCount(Fields!bm.Value)
这种方法,在翻页的时候会重新从1开始计数,目前尚未解决,可以尝试将表格嵌套在矩阵中。
第二种情况,分组外排序,即给组排序,从1开始,每多一个不同的分组添加1,有多少个不同的组,序号就增加到多少。
1 Dim count As Integer 2 Dim GroupName As String 3 Public Function GroupCount(name As String) As String 4 5 If (GroupName = "") Then 6 count = 1 7 GroupName = name 8 GroupCount = count 9 Exit Function 10 End If 11 12 If (GroupName = name) Then 13 count = count 14 GroupCount = count 15 Else 16 GroupName = name 17 count = count + 1 18 GroupCount = count 19 End If 20 21 End Function
然后在需要添加序号的表格中添加表达式=Code.GroupCount(Fields!bm.Value)