IBM Lotus Symphony
|
Palauttaa määritetyn vuoden, kuukauden tai päivän Päivämäärä-arvon.
DateSerial (year, month, day)
Päivämäärä
Year: Kokonaislukulauseke, joka ilmaisee vuoden. Kaikki arvot 0 - 99 tulkitaan vuosiksi 1900 - 1999. Tämän joukon ulkopuolella oleville vuosille joudut kirjoittamaan kaikki neljä numeroa.
Month: Kokonaislukulauseke, joka ilmaisee määritetyn vuoden kuukauden. Hyväksytty arvoalue on 1 - 12.
Day: Kokonaislukulauseke, joka ilmaisee määritetyn kuukauden päivän. Hyväksytty arvoalue on 1–31. Järjestelmä ei palauta virhettä, kun määrität alle 31 päivän pituiseen kuukauteen päivän, jota ei ole.
DateSerial-funktio palauttaa päivämäärän 30.12.1899 ja määritetyn päivämäärän välisen päivien määrän. Tämän funktion avulla voit laskea kahden päivämäärän välisen eron.
DateSerial-funktio palauttaa tietolajin Variant ja VarType 7 (päivämäärä). Sisäisesti tämä arvo tallennetaan pitkänä liukulukuarvona, jolloin päivämäärän ollessa 1.1.1900 palautettu arvo on 2. Negatiiviset arvot tarkoittavat päivämääriä ennen 30.12.1899 (niin, että kyseistä päivää ei lasketa mukaan).
Jos määritetty päivämäärä ei ole kelvollisen päivämäärävälin mukainen, Lotus Symphony Basic -ohjelma palauttaa virhesanoman.
Vaikka DateValue-funktio määritetään merkkijonona, joka sisältää päivämäärän, DateSerial-funktio laskee kunkin parametrin (year, month, day) erillisenä numeerisena lausekkeena.
Sub ExampleDateSerial
Dim lDate as Long
Dim sDate as String
lDate = DateSerial(1964, 4, 9)
sDate = DateSerial(1964, 4, 9)
msgbox lDate REM palauttaa 23476
msgbox sDate REM palauttaa arvon 04/09/1964
end sub