VB进行大于24小时的时间类型结果集运算?

来源:百度知道 编辑:UC知道 时间:2024/06/01 11:17:33
sum(rs("time"))后,如何将其显示为大于24小时的HH:mm:ss时间

如“ 120:33:02 ”
回答者:a6622868123那个还是24小时内的,我的意思是 累计时间已经超过1天了,但只用小时数表示。 timer和sql的日期结果集似乎还是有区别的

Private Sub Command1_Click()
Dim a$, b$
a = "11:04:37PM"
Print Format(a, "hh:mm:ss")

b = "23:04:37"
Print Format(b, "hh:mm:ssAMPM")
End Sub

定义 a$
一个Timer里面a每秒+1
时=a除以3600取整
分=(a除以3600取余)除以60取整
秒=(a除以3600取余)除以60取余

结果显示成字符型

我就会这么做了