| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助]工龄代码完善 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=178887) |
| -- 作者：老鼠 -- 发布时间：2022/7/26 10:06:00 -- [求助]工龄代码完善 以下是原有代码： Select Case e.DataCol.Name Case "参加工作时间" \'根据入职日期 自动计算工龄 If e.DataRow.IsNull("参加工作时间") Then e.DataRow("工龄") = Nothing \'若入职日期为空 则清除工龄的值 Else e.DataRow("工龄") = Date.Today.Year - e.DataRow("参加工作时间").year End If End Select 要求是工龄小于1年时为工龄值为：1而不是0
|
| -- 作者：cd_tdh -- 发布时间：2022/7/26 10:27:00 -- Else e.DataRow("工龄") = Date.Today.Year - e.DataRow("参加工作时间").year
if e.DataRow("工龄") = 1 then
e.DataRow("工龄") = 0
end if
End If
|
| -- 作者：有点蓝 -- 发布时间：2022/7/26 10:42:00 -- http://www.foxtable.com/webhelp/topics/2647.htm |