Lotus Symphony 1.2


TimeValue 函數 [執行時期]

依作為字串傳送的指定 hour、minute 和 second 等參數,計算以單一數值表示的順序時間值。此值可以用來計算兩個時間之間的差。

語法:

TimeValue(Text As String)

回覆值:

日期

參數:

Text:任意字串表示式,包含要計算的、格式為 HH:MM:SS 的時間。

此函數可用於將任何時間轉換成單一值,以便計算時間差。

TimeValue 函數的傳回類型是變數,其 VarType 為 7 (即 Date),並在內部將此值儲存為 0 到 0.9999999999 之間的雙精度數。

在 TimeSerial 函數中,可以用獨立的數值表示式來傳送個別參數 (hour、minute、second);而在 TimeValue 函數中,則用包含時間的參數來傳送字串。

在 TimeSerial 函數中,您可以將個別參數 (hour、minute、second) 作為獨立的數值表示式來傳遞。然而,在 TimeValue 函數中,則可以將字串作為包含時間的參數來傳遞。

錯誤代碼

5 無效的程序呼叫

13 類型不相符

範例:

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


其他文件 | 商標