IBM Lotus Symphony


TimeValue-funktio [käytönaikainen]

Laskee sarja-aika-arvon määritetyistä tunti-, minuutti- ja sekuntiparametreista, jotka on välitetty merkkijonoina. Se ilmaisee kellonajan yhtenä numeerisena arvona. Tämän arvon avulla voit laskea kellonaikojen välisen eron.

Syntaksi:

TimeValue (Text As String)

Palautusarvo:

Päivämäärä

Parametrit:

Text: Mikä tahansa merkkijonolauseke, joka sisältää kellonajan, jonka haluat laskea muodossa "HH:MM:SS".

TimeValue-funktion avulla voit muuntaa minkä tahansa kellonajan yhdeksi arvoksi, jonka avulla voit laskea kellonaikojen eroja.

TimeValue-funktio palauttaa lajin Variant ja VarType 7 (päivämäärä) ja tallentaa kyseisen arvon sisäisesti kaksoistarkkana lukuna 0 - 0,9999999999.

TimeSerial-funktiossa voit välittää yksittäiset parametrit (hour, minute, second) erillisinä numeerisina lausekkeina. TimeValue-funktiossa sen sijaan voit välittää merkkijonon parametrina, joka sisältää kellonajan.

Virhekoodit

Virhekoodit

5 Virheellinen toimintokutsu

13 Lajit eivät täsmää

Esimerkki:

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


Palautetta tuotteesta | Lisäohjeet | Tavaramerkit