Rss & SiteMap

Foxtable(狐表) http://www.foxtable.com

新一代数据库软件,完美融合Access、Foxpro、Excel、vb.net之优势,人人都能掌握的快速软件开发工具!
共3 条记录, 每页显示 10 条, 页签: [1]
[浏览完整版]

标题:自动填入时间差的代码问题

1楼
hejfen 发表于:2009/1/29 11:42:00
dim t1 as date = e.datarow("加班起时间")
dim t2 as date = e.datarow("加班止时间")
e.datarow("合计加班时间") = datadiff(h,t2,t1)

出现错误,求助正确的代码!
2楼
czy 发表于:2009/1/29 23:10:00
datadiff是什么?

看一下这个贴子:
http://www.foxtable.com/dispbbs.asp?boardid=2&Id=1692
3楼
程兴刚 发表于:2009/1/30 10:32:00
以下是引用hejfen在2009-1-29 11:42:00的发言:
dim t1 as date = e.datarow("加班起时间")
dim t2 as date = e.datarow("加班止时间")
e.datarow("合计加班时间") = datadiff(h,t2,t1)

出现错误,求助正确的代码!
没有文件,未测试,这样试试:

dim t1 as date = e.datarow("加班起时间")'加班起止时间均为长时间格式型
dim t2 as date = e.datarow("加班止时间")
Dim t3 As TimeSpan = t2 - t1
e.datarow("合计加班时间") = t3.TotalHours



不知道这样简化行不行,再试试看:

Dim t As TimeSpan = e.datarow("加班止时间") - e.datarow("加班起时间") '加班起止时间均为长时间格式型
e.datarow("合计加班时间") = t.TotalHours
共3 条记录, 每页显示 10 条, 页签: [1]

Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号

Powered By Dvbbs Version 8.3.0
Processed in .02734 s, 2 queries.