当前位置:编程学习 > VB >>

vb DTPicker两天时间差

有两个DTPicker, DTPicker1显示的是第一天的时间,DTPicker2显示第二天的时间,如何得出中间经过了多长时间?
补充:现在的问题是DTPicker1显示的是第一天的时间比如:11:15pm,DTPicker2显示第二天的时间比如:05:00am,那么DTPicker2-DTPicker1=5.45是对的,下面的方法好像都得不到这个结果
答案:最简单的方法是直接把DTPicker2减去DTPicker1,这样得出的是两者相差的天数,比如:
DTPicker2.Value - DTPicker1.Value = 4.2586342592622
把小数部分再乘以24就可以得出小时数,依此可逐步算出分钟、秒
 
标准的方法是用DateDiff函数:
DateDiff("h", DTPicker2.Value, DTPicker1.Value)
这是算出两个日期间的小时数
DateDiff("s", DTPicker2.Value, DTPicker1.Value)
这是秒数
其他:用DateDiff函数
参考:http://baike.zhaoxi.net/view/674204.htm Private Sub DTPicker2_CloseUp()
    Me.Caption = DateDiff("d", DTPicker1.Value, DTPicker2.Value)
End Sub

上一个:请教用VB自动根据EXCLE表建新表的代码
下一个:VB中加是Val()+Val()吗

CopyRight © 2012 站长网 编程知识问答 www.zzzyk.com All Rights Reserved
部份技术文章来自网络,