求时间统计方法

火龙　发表于：2008-10-07 22:06:51 　

求时间统计代码

比如:我要统计08:00到14:00有几个小时..应该如何实现自动计算时间

Text1.text="08:00"

text2.text="14:00"

text3.text=(8点到14点的时间)该如何统计

钱玉炜发表于：2008-10-07 22:35:24

用函数datediff

钱玉炜发表于：2008-10-08 08:14:25

使用方法按F1查看帮助

火龙发表于：2008-10-08 14:20:13

能帮忙举个列子?

黎红军发表于：2008-10-08 18:20:44

'me.Text1="08:00"

'text2.text="14:00"

me.text3=datediff("h",me.Text1,me.Text2)

DateDiff 函数可用来决定两个日期之间所指定的时间间隔数目。例如，可以使用 DateDiff 来计算两个日期之间相隔几日，或计算从今天起到年底还有多少个星期。

DateDiff 函数示例

本示例使用 DateDiff 函数来显示某个日期与今日相差几天。

Dim TheDate As Date    ' 声明变量。
Dim Msg
TheDate = InputBox("Enter a date")
Msg = "Days from today: " & DateDiff("d", Now, TheDate)
MsgBox Msg

符鸿敏发表于：2008-10-08 22:49:42

如要求小时差，就：

Text3 = DateDiff("h", Text1, Text2)

如要求分差，就：

Text3 = DateDiff("n", Text1, Text2)

如要求秒差，就：

Text3 = DateDiff("s", Text1, Text2)

.....余类推。

总记录：5篇页次：1/1 9 1 :