Dim time1,time2 As StringDim t1,t2 As Integertime1="23:01"time2="1:59"
t1=Cint(mid(time1,1,Instr(time1,":")-1))*60+Cint(mid(time1,Instr(time1,":")+1,2)) t2=Cint(mid(time2,1,Instr(time2,":")-1))*60+Cint(mid(time2,Instr(time2,":")+1,2)) output.show(t1+t2)
转换为分钟,后面你自己再转为小时+分钟就OK了,其实很多时间数据结构很重要