Как рассчитать прошедшее время в секундах в VBA?

У меня есть 2 строки, strStartTime и strEndTime.

strStartTime = "12:32:54" strEndTime = "12:33:05"

Я хочу узнать, сколько секунд прошло между strStartTime и strEndTime, поэтому я сделал следующее:

Dim dtDuration as date
dtDuration = DateDiff("s", CDate(strStartTime), CDate(strEndTime))  

В результате я получил dtDuration = "# 1/10/1900 #" в Окно наблюдения за местными жителями.

Почему это происходит? Как мне получить dtDuration равным 11 для 11 секунд, прошедших между временем начала и окончания?

8
задан Joel Coehoorn 23 February 2012 в 03:43
поделиться