以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 表达式列同一个人同一天的时长计算怎么写 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=195843) |
-- 作者:fx719 -- 发布时间:2025/3/13 18:28:00 -- 表达式列同一个人同一天的时长计算怎么写 |
-- 作者:有点蓝 -- 发布时间:2025/3/13 20:00:00 -- 要使用代码处理,datacolchanged事件 Select Case e.DataCol.Name Case "填写日期","员工姓名","时长" Dim dr As DataRow = e.DataRow If dr.IsNull("填写日期") OrElse dr.IsNull("员工姓名") Then dr("汇总时长") = Nothing Else dim cnt as double = e.DataTable.Compute("Sum(时长)","[员工姓名] = \'" & dr("员工姓名") & "\' and 填写日期=#" & dr("填写日期") & "#") SystemReady = False e.DataTable.replacefor("汇总时长",cnt,"[员工姓名] = \'" & dr("员工姓名") & "\' and 填写日期=#" & dr("填写日期") & "#") SystemReady = true End If
End Select |