主题：排班表统计列区间莫字符出现的次数

DataColChanged

If e.DataCol.Name Like "No*" Then

    dim sum as integer = 0

    for i as integer = 1 to 31

        If e.datarow("No" & i) = "年" then

            sum += 1

        End If

    next

    e.datarow("年休") = sum

End If