社区
VB基础类
帖子详情
VB中怎么计算两个日期间的小时数??
softwareperson
2004-07-25 11:21:03
比如:
2004-07-16 5时到2004-08-20 23时间的小时数??
...全文
234
7
打赏
收藏
VB中怎么计算两个日期间的小时数??
比如: 2004-07-16 5时到2004-08-20 23时间的小时数??
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
7 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
helanshan
2004-07-25
打赏
举报
回复
Private Sub Form_Click()
Dim d1 As Date
Dim d2 As Date
d1 = "2004-07-16 05:00:00"
d2 = "2004-08-20 23:00:00"
Print (d2 - d1) * 24
End Sub
改了一点。。。^-^
TechnoFantasy
2004-07-25
打赏
举报
回复
Dim d1 As Date
Dim d2 As Date
d1 = "2004-07-16 05:00:00"
d2 = "2004-08-20 23:00:00"
Debug.Print (d2 - d1) / (1 / 24)
yas
2004-07-25
打赏
举报
回复
To TechnoFantasy(冰儿马甲www.applevb.com) :
为什么你开始不用datediff?
五星上将不用肯定有道理,讲讲我们大家见识见识
yas
2004-07-25
打赏
举报
回复
datediff("h",date1,date2)
TechnoFantasy
2004-07-25
打赏
举报
回复
最终你的计算还是要转换到Date类型上面来的。就像楼上给的答案一样。
northwolves
2004-07-25
打赏
举报
回复
Private Sub Command2_Click()
Dim d1 As String, d2 As String
d1 = "2004-07-16 05:00:00"
d2 = "2004-08-20 23:00:00"
MsgBox DateDiff("h", CDate(d1), CDate(d2))
End Sub
Mars.CN
2004-07-25
打赏
举报
回复
d1 = "2004-07-16 05:00:00"
d2 = "2004-08-20 23:00:00"
Print (d2 - d1) * 24
问什么非要定义成DATE型的??
有没有其他的??
rar压缩软件.rar
包含
两个
掩码,并且所有文件既匹配第一个掩码,也匹配第二个掩码, 较小的子集 或者更精确的匹配拥有更高的优先权。例如,如果你用 *.cpp 和 f*.cpp 掩码, f*.cpp 拥有更高的优先权。 RAR 命令行语法 ~~~~~~...
中
文简体压缩软件RAR 6.0
包含
两个
掩码,并且所有文件及匹配第一个掩码,也匹配第二个掩码, 第一个掩码 将拥有更高的优先权,即使它被放到第二个后面。例如,存在*.cpp 和 f*.cpp 掩码 的情况下,f*.cpp 拥有更高的优先权。 RAR ...
WinRAR_4.0.exe
包含
两个
掩码,并且所有文件既匹配第一个掩码,也匹配第二个掩码, 较小的子集 或者更精确的匹配拥有更高的优先权。例如,如果你用 *.cpp 和 f*.cpp 掩码, f*.cpp 拥有更高的优先权。 RAR 命令行语法 ~~~~~~...
vb
.net 求得
两个
日
期的时间差
返回 Variant (Long) 的值,表示
两个
指定
日
期间
的时间间隔数目。 语法 DateDiff(interval, date1, date2[, firstdayofweek[, firstweekofyear]]) DateDiff 函数语法
中
有下列命名参数: 部分 描述 ...
VB
6的
日
期/时间函数
VB
6常用的时间/
日
期函数,包括获取时间/
日
期的方法,截取时间/
日
期的部分,时间/
日
期的
计算
方法
VB基础类
7,759
社区成员
197,606
社区内容
发帖
与我相关
我的任务
VB基础类
VB 基础类
复制链接
扫一扫
分享
社区描述
VB 基础类
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章