LibreOffice 24.8 Help
依作為字串傳送的指定 hour、minute 和 second 等參數,計算以單一數值表示的順序時間值。此值可以用來計算兩個時間之間的差。
TimeValue(Text As String)
日期
Text:任意字串型表示式,包含要計算的、格式為「HH:MM:SS」的時間。
此函式可用於將任何時間轉換成單一值,以便計算時間差。
TimeValue 函式的傳回類型是變體型,其 VarType 為 7 (即 Date),並在內部將此值儲存為 0 到 0.9999999999 之間的雙精度數。
在 DateSerial 或 DateValue 函式中,順序日期值的計算結果是相對於某個固定日期的,但對於 TimeValue 函式,您可以透過其傳回值來進行計算,但無法演算傳回值本身。
在 TimeSerial 函式中,可以用獨立的數值型表示式來傳送個別參數 (hour、minute、second);而在 TimeValue 函式中,則用包含時間的參數來傳送字串。
Sub ExampleTimerValue
Dim daDT As Date
Dim a1, b1, c1, a2, b2, c2 As String
a1 = "start time"
b1 = "end time"
c1 = "total time"
a2 = "8:34"
b2 = "18:12"
daDT = TimeValue(b2) - TimeValue(a2)
c2 = a1 & ": " & a2 & chr(13)
c2 = c2 & b1 & ": " & b2 & chr(13)
c2 = c2 & c1 & ": " & trim(Str(Hour(daDT))) & ":" & trim(Str(Minute(daDT))) & ":" & trim(Str(Second(daDT)))
MsgBox c2
End Sub