以下是引用有点甜在2018/12/19 9:39:00的发言：
If e.Form.Controls("CheckBox2").Checked = True Then ''如果垂直分组列被选中,则进行下面处理,确保合计行位于最后一行,首先需要添加临时列,否则不能移动行
t.DataTable.DataCols.Add("_sortkey", Gettype(Decimal))
''移动合计行
For Each r As Row In t.Rows
r("_sortkey") = r.Index
If r("单位") = "合计" Then
r("_sortkey") = t.Rows.count
End If
Next
t.sort = "_sortkey"
End If
老师，您好厉害呀，
1、这个临时列需要删除么
2、这个列好像不是普通的临时列，作用好大呀？为啥？包括那个Decimal
您可以指点一下我么？
加好友 
发短信
Post By：2018/12/19 11:06:00 [只看该作者]
