以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  排班表统计列区间莫字符出现的次数  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=111026)
--  作者：蓝蚂蚁
--  发布时间：2017/12/14 8:41:00
--  排班表统计列区间莫字符出现的次数

图片点击可在新窗口打开查看此主题相关图片如下：排班表.jpg
图片点击可在新窗口打开查看
 谢谢
[此贴子已经被作者于2017/12/14 8:43:33编辑过]
--  作者：有点甜
--  发布时间：2017/12/14 8:59:00
--  

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