主题：怎样利用表达式列根据另一列的变化，对编号重新排序，如图

想把序号列做成表达式列，根据部门名称变化后，重新从1开始排序

if e.datacol.name = "部门名称" then

dim idx as integer = 1

    for each dr as datarow in e.datatable.select("部门名称='" & e.newvalue & "'","_sortkey")

dr("序号") = idx

idx = idx + 1

next

end if