IBM Lotus Symphony


Funkcja TimeValue [środowisko wykonawcze]

Oblicza wartość czasu od określonej godziny, minuty i sekundy. Parametry są przesyłane jako łańcuchy reprezentujące czas w pojedynczej wartości liczbowej. Ta wartość może być używana do obliczania różnicy czasowej.

Składnia

TimeValue (Tekst As String)

Zwracana wartość

Data

Parametry

Tekst: Wyrażenie zawierające czas, których ma być obliczony w formacie "GG:MM:SS".

Funkcja TimeValue służy do przekształcania dowolnej godziny w pojedynczą wartość, dzięki czemu można obliczać różnice w czasie.

Ta funkcja TimeValue zwraca wartość Variant typu VarType 7 (Date) i przechowuje tę wartość jako liczbę o podwójnej precyzji z przedziału od 0 do 0,9999999999.

W przeciwieństwie do funkcji DateSerial lub DateValue, gdzie wartości daty odpowiadają liczbie dni do określonego dnia, można ją obliczyć przy użyciu wartości zwracanej przez funkcję TimeValue, ale nie można ich oszacować.

W funkcji TimeSerial pojedyncze parametry (godzinę, minutę, sekundę) można przesyłać jako oddzielne wyrażenia liczbowe. Jednak w przypadku funkcji TimeValue można przesłać łańcuch jako parametr zawierający godzinę.

Kody błędów

5 Nieprawidłowe wywołanie procedury

13 Niezgodność typu

Przykład

Sub Przyklad_TimerValue

Dim daDT as Date

Dim a1, b1, c1, a2, b2, c2 as String

a1 = "godzina rozpoczęcia"

b1 = "godzina zakończenia"

c1 = "łączny czas"

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


Opinia na temat produktu | Dodatkowa dokumentacja | Znaki towarowe