欢迎您:游客!请先
登录
或
注册
风格
恢复默认设置
|
展区
文件集浏览
图片集浏览
Flash浏览
音乐集浏览
电影集浏览
|
搜索
Foxtable(狐表)
→
用户栏目
→
专家坐堂
→ 请教出勤时数近似求整计算
新的主题
投票帖
小字报
下一主题 >>
<< 上一主题
共有
1856
人关注过本帖
平板
打印
复制链接
主题:请教出勤时数近似求整计算
wakai
小
大
1楼
|
信息
|
搜索
|
邮箱
|
主页
|
UC
加好友
发短信
等级:小狐
帖子:
360
积分:3410
威望:0
精华:0
注册:
2016/5/25 21:31:00
请教出勤时数近似求整计算
Post By:2019/7/22 0:27:00 [
只看该作者
]
按帮助里的时段计算,代码如下
Case "上午上班","下午下班"
If dr.IsNull("上午上班") Or dr.IsNull("下午下班") Then
dr("出勤时数") = Nothing
Else
Dim tp As TimeSpan
tp = dr("下午下班") - dr("上午上班")
dr("出勤时数") = tp.TotalHours() '真正的时段型数据要转换为秒数,才能存入时段列
End If
会出现多余的分钟数导致有小数不一
要实现如上班上班<=8:00,按8:00
下午下班>=17:00按17:00点计算,请教老师要怎么写代码
下一主题 >>
<< 上一主题
RSS2.0
|
Xhtml无图版
|
Xslt无图版
Copyright © 2000 - 2018
foxtable
.com
Tel: 4000-810-820 粤ICP备11091905号
Powered By
Dvbbs
Version 8.3.0
页面执行时间 0.02539 秒, 5 次数据查询