IBM Lotus Symphony
|
Laskee sarja-aika-arvon määritetyn tunti-, minuutti- ja sekuntiparametrin mukaan, jotka välitetään numeroarvona. Sen jälkeen voit laskea kahden kellonajan eron tämän luvun avulla.
TimeSerial (hour, minute, second)
Päivämäärä
hour: Mikä tahansa kokonaislukulauseke, joka osoittaa sen kellonajan tunnin, jonka avulla sarja-aika-arvo määritetään. Kelvolliset arvot: 0 - 23.
minute: Mikä tahansa kokonaislukulauseke, joka osoittaa sen kellonajan minuutin, jonka avulla sarja-aika-arvo määritetään. Yleensä kelvolliset arvot ovat 0 - 59. Voit kuitenkin käyttää myös tämän alueen ulkopuolella olevia lukuja, jolloin minuuttien määrä vaikuttaa tuntiarvoon.
second: Mikä tahansa kokonaislukulauseke, joka osoittaa sen kellonajan sekunnin, jonka avulla sarja-aika-arvo määritetään. Yleensä voit käyttää arvoja 0 - 59. Voit kuitenkin käyttää myös tämän alueen ulkopuolella olevia lukuja, jolloin sekuntien määrä vaikuttaa minuuttiarvoon.
Esimerkkejä:
12, -5, 45 on sama kuin 11, 55, 45
12, 61, 45 on sama kuin 13, 2, 45
12, 20, -2 on sama kuin 12, 19, 58
12, 20, 63 on sama kuin 12, 21, 4
TimeSerial-funktion avulla voit muuntaa minkä tahansa kellonajan yhdeksi arvoksi, jonka avulla voit laskea kellonaikojen eroja.
TimeSerial-funktio palauttaa lajin Variant ja VarType 7 (päivämäärä). Tämä arvo on tallennettu sisäisesti kaksoistarkkana lukuna 0 - 0,9999999999. Toisin kuin DateSerial-funktiossa tai DateValue-funktiossa, joissa sarjapäivämääräarvot lasketaan päivinä suhteessa kiinteään päivämäärään, TimeSerial-funktion palauttamilla arvoilla voi laskea, mutta niitä ei voi arvioida.
TimeValue-funktiossa voit välittää merkkijonon parametrina, joka sisältää kellonajan. TimeSerial-funktiossa sen sijaan voit välittää yksittäiset parametrit (tunti, minuutti, sekunti) erillisinä numeerisina lausekkeina.
Sub ExampleTimeSerial
Dim dDate As Double, sDate As String
dDate = TimeSerial(8,30,15)
sDate = TimeSerial(8,30,15)
MsgBox dDate,64,"Time as a number"
MsgBox sDate,64,"Formatted time"
End Sub