以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 如何判断是否周末 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=149789) |
-- 作者:13775189031 -- 发布时间:2020/5/12 13:25:00 -- 如何判断是否周末 列名称:统计日期 休息日判断 增加行时,自动显示统计日期为今天,能否实现自动判断今天是否周末,如果是周末,自动在“休息日判断”中显示“周末”?
|
-- 作者:shenyl0211 -- 发布时间:2020/5/12 13:47:00 -- 帮助文档搜索“星期” |
-- 作者:有点蓝 -- 发布时间:2020/5/12 14:10:00 -- http://www.foxtable.com/webhelp/topics/0229.htm |
-- 作者:13775189031 -- 发布时间:2020/5/13 8:26:00 -- If e.DataCol.Name = "考勤日期" Then If e.DataRow.IsNull("考勤日期") = True Then e.DataRow("星期") = Nothing Else e.DataRow("星期") = e.DataRow("考勤日期").DayOfWeek End If End If Dim dr2 As DataRow = e.DataRow Select Case e.DataCol.Name Case "星期","休息日" If dr2("星期") = "Saturday" OrElse dr2("星期") = "Sunday" Then \'如果数量或单价为空 dr2("休息日") = "休息日" Else dr2("休息日") = Nothing End If End Select 上面的代码有一个问题,就是列“休息日”没办法修改,例如遇到调休的状况,周末不是休息日,要怎么改代码?
|
-- 作者:有点蓝 -- 发布时间:2020/5/13 9:10:00 -- Case "星期","休息日" 改为 Case "星期" 要专门建一个调休表,记录特殊的日期,然后查表判断是否是休息日
|