- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- 两个日期之间怎样计算差值 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=178533)
-- 发布时间：2022/7/8 16:13:00
-- 两个日期之间怎样计算差值
大家好！
初学foxtable现遇到一个问题，两列日期怎样计算之间的差值？
如下图:
在此谢谢啦！
-- 发布时间：2022/7/8 16:32:00
--
比如：http://www.foxtable.com/webhelp/topics/1452.htm
-- 发布时间：2022/7/8 16:35:00
--
使用这段事件代码，“生产使用时间”这栏没有显示：
Select Case e.DataCol.name
Case "生产开始时间","生产结束时间"
Dim dr As DataRow = e.DataRow
If dr.IsNull("生产开始时间") Or dr.IsNull("生产结束时间") Then
dr("生产使用时间") = Nothing
Else
Dim tp As TimeSpan
tp = dr("生产结束时间") - dr("生产开始时间")
dr("生产使用时间") = tp.TotalSeconds() \'真正的时段型数据要转换为秒数,才能存入时段列
End If
End Select
Case "生产开始时间","生产结束时间"
Dim dr As DataRow = e.DataRow
If dr.IsNull("生产开始时间") Or dr.IsNull("生产结束时间") Then
dr("生产使用时间") = Nothing
Else
Dim tp As TimeSpan
tp = dr("生产结束时间") - dr("生产开始时间")
dr("生产使用时间") = tp.TotalSeconds() \'真正的时段型数据要转换为秒数,才能存入时段列
End If
End Select
不知道是那是写错了
-- 发布时间：2022/7/8 16:37:00
--
已有数据重置一下列：http://www.foxtable.com/webhelp/topics/1469.htm
-- 发布时间：2022/7/8 16:52:00
--
谢谢@有点蓝老师，
刚刚我重新设置后可以显示了，我现又遇到一个问题，上班时间段，上午8：30-12：00，下午13：-17：30，因为我们中午要休息一个小时，我们上午时间段的话不用减一个小时，从上午到下午的时间段就要减一个小时，这个代码不知怎么写？
-- 发布时间：2022/7/8 16:58:00
--
参考：http://www.foxtable.com/webhelp/topics/1337.htm
获取小时部分进行判断，如果开始时间小时数小于12，同时结束时间小时数大于13，就减去1个小时
或者分开2次计算。如果开始时间小于12点，就使用12点的时间减去开始时间；同理下午就使用结束时间减去13点。然后2个计算结果相加
-- 发布时间：2022/7/8 17:06:00
--
老师，我能理解你说的意思，但具体的代码我不怎么会写，你指点一下吗？
-- 发布时间：2022/7/8 17:29:00
--
dim d1 as date = cdate("2022-7-8 10:00")
dim d2 as date = cdate("2022-7-8 15:00")
Dim tp As TimeSpan= d2 - d1
dim h as double = tp.TotalSeconds()
if d1.hour < 12 andalso d2.hour > 13 then
h = h - 3600
endif
msgbox(h)
-- 发布时间：2022/7/8 19:29:00
--
谢谢老师