社区
VB基础类
帖子详情
如何计算二个时间差?
tophoney
2004-03-09 12:25:59
精确到秒,但结果用天表示,如
(2004-2-8 20:32:02) - (2004-2-9 1:03:20)
结果是多少天?如何运算?
...全文
122
3
打赏
收藏
如何计算二个时间差?
精确到秒,但结果用天表示,如 (2004-2-8 20:32:02) - (2004-2-9 1:03:20) 结果是多少天?如何运算?
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
3 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
helanshan
2004-07-30
打赏
举报
回复
Private Sub Command1_Click()
Dim d1 As Date
Dim d2 As Date
d1 = "2004-2-8 20:32:02"
d2 = "2004-2-9 1:03:20 "
Print (d2 - d1) * 24 '乘24返回小时,乘24再乘60返回分钟,乘 24再乘3600 返回秒 ,不乘返回天数
End Sub
northwolves
2004-07-30
打赏
举报
回复
Private Sub Command1_Click()
Dim x As Single
x = CDate("2004-2-8 20:32:02") - CDate("2004-2-9 1:03:20")
MsgBox x & " 天" & vbCrLf & x * 3600 * 24 & " 秒"
End Sub
我和我的蓝天白云
2004-07-30
打赏
举报
回复
function GetDoTime(Time1, Time2)
Dim stime
If Time1 > Time2 Then
stime = Time1
Time1 = Time2
Time2 = stime
End If
secondvalue = DateDiff("s", Time1, Time2)
dayvalue = DateDiff("d", Time1, Time2)
hourvalue = Fix((secondvalue - dayvalue * 24 * 3600) / 3600)
If hourvalue < 0 Then dayvalue = dayvalue - 1: hourvalue = 24 + hourvalue
minitevalue = Fix((secondvalue - dayvalue * 24 * 3600 - hourvalue * 3600) / 60)
If minitevalue < 0 Then hourvalue = hourvalue - 1: minitevalue = 60 + minitevalue
secvalue = secondvalue - dayvalue * 24 * 3600 - hourvalue * 3600 - minitevalue * 60
If secvalue < 0 Then minitevalue = minitevalue - 1: secvalue = 60 + secvalue
GetDoTime=dayvalue & "天" & hourvalue & "小时" & minitevalue & "分" & secvalue & "秒"
End function
尹成Python27天入门到项目实战
python字符串与绘图复习变量None变量参与运算没有赋值的情况不会改变绘制立方体绘制五角星时间
计算
强化实现贷款
计算
连续输入多个字符串加法与绘图实现显示线段长度数据函数使用快速查阅函数帮助字符串三种风格字符...
JavaScript如何
计算
两个日期之间的
时间差
?
JavaScript如何
计算
两个日期之间的
时间差
?
php两个日期
时间差
_PHP如何
计算
两个日期之间的
时间差
?(代码示例)
给定两个日期,如何
计算
出它们之间的
时间差
?下面本篇文章就给大家介绍用PHP
计算
两个日期之间
时间差
的几种方法,希望对大家有所帮助。方法一:使用date_diff()函数来
时间差
date_diff()函数可以返回两个 DateTime ...
计算
机公式求
时间差
公式,日期差
计算
(Excel表格中如何
计算
日期、
时间差
)
日期差
计算
(Excel表格中如何
计算
日期、
时间差
)在Excel表格中,日期、时间都可以
计算
的,利用好了,可以省去大量的工作,今天小编分享在Exc百思特网el中利用函数
计算
日期、
时间差
百思特网。情况一:日期
计算
,利用...
java
计算
时间差
_Java中
计算
两个日期的
时间差
这篇文章将使用两个例子
计算
两个日期的
时间差
。1.使用Java SDK。2.使用Joda库。1.使用Java SDK
计算
两个Date之间的
时间差
,基本思路为把Date转换为ms(微秒),然后
计算
两个微秒
时间差
。时间的兑换规则如下:1s秒 = ...
VB基础类
7,763
社区成员
197,605
社区内容
发帖
与我相关
我的任务
VB基础类
VB 基础类
复制链接
扫一扫
分享
社区描述
VB 基础类
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章