多次相加

Adding multiple times together

我正在尝试添加一些从数据库中提取的数据,格式为 HH:MM:SS 我正在尝试将它们加在一起,所以如果我们有 00:00:05 然后 00:00:10 所以我们有 00:00:15

我尝试了 TimeSpan 和 DateTime,但出现以下错误:

Microsoft VBScript runtime error '800a01a8'

Object required: 'TimeSpan'

Script Location, line 157

这是代码:

    While Not objRS.EOF
  
  activecalls = activecalls + objRS("talkingagents")
  callswaiting = callswaiting + objRS("callswaiting")
  averagetalkingtime = averagetalkingtime + objRS("convavgtalkduration")
  totalqueue = totalqueue + 1
  totalcalls = totalcalls + objRS("totalcalls")
  newWait = objRS("convavgwaitduration")

  
  TimeSpan t1 = TimeSpan.Parse(newWait)
  TimeString FormattedDate = t1.Add(FormattedDate)
  
  timeString = timeString.Add(t1).ToString("dd\.hh\:mm\:ss")

不清楚你的代码,但这可能是你要找的。

t1 = CDate("00:00:05")
t2 = CDate("00:00:10")
t3 = t1 + t2
MsgBox Right("00" & Hour(t3), 2) + ":" + Right("00" & Minute(t3), 2) + ":" + Right("00" & Second(t3), 2)