数据库存放字段worktime,(类型:varchar(6),说明:HHmmss),页面要求显示 HH:mm:ss
1.sql语句,可以将worktime的数据,转成 秒数
SELECT SUM( cast( substring( d13.`worktime`, 1, 2 ) AS DECIMAL ) * 3600 + cast( substring( d13.`worktime`, 3, 2 ) AS DECIMAL ) * 60+ cast( substring( d13.`worktime`, 5, 2 ) AS DECIMAL ) ) AS 'totalTime' FROM d13
2.vb后台,将 秒数 转成 时分秒的格式
label1.Text = Format(DateAdd("s", CDec(label1.Text), "00:00:00"), "HH:mm:ss")
CDec(表达式):是将表达式参数,转成Decimal类型的数据
https://docs.microsoft.com/zh-cn/office/vba/Language/Reference/User-Interface-Help/dateadd-function 关于DateAdd方法的介绍
DateAdd("s",秒数,"00:00:00"),将秒 转成 包含时分秒的日期
Format(object,"格式"),在这里,格式日期数据,返回string