Module
Contents
Index 🔎︎

# DateSerial Function

DateSerial palauttaa Date-tyyppisen arvon määrätystä vuodesta, kuukaudesta tai päivästä.

## Syntaksi:

    DateSerial (vuosi1, kuukausi1, pv1)

## Palautusarvo:

Päivämäärä

## Parametrit:

Vuosi1: kokonaislukulauseke, joka tarkoittaa vuotta. Arvot väliltä 0...99 tulkitaan vuosiksi 1900-1999. Tämän aikavälin ulkopuoliset vuodet on kirjoitettava neljällä numerolla.

Kuukausi1: kokonaislukulauseke, joka tarkoittaa määrätyn vuoden kuukautta. Sallitut arvot ovat 1...12.

Pv1: kokonaislukulauseke, joka tarkoittaa määrätyn kuukauden päivää. Sallitut arvot ovat välillä 1...31. Virheilmoitusta ei tule, jos syötetään kalenteriin kuulumaton päivä kuukaudelle, joka on lyhyempi kuin 31 päivää.

DateSerial-funktio palauttaa päivien määrän joulukuun 30.1899 ja annetun päivämäärän välillä. Funktiota voi käyttää kahden päiväyksen päivämääräeron laskemiseen.

DateSerial-funktio palautusarvo on variant-tietotyyppiä, jossa VarType-määre on 7 (Date). Sisäisesti tämä arvo on talletettu double-tyyppisenä kaksoistarkkuuden liukulukuna, niin että annettaessa päivämäärä 1.1.1900 palautusarvo on 2. Negatiiviset arvot vastaavat päivämääriä ennen joulukuun 30. 1899 (ei lueta mukaan).

Annettaessa päivämäärä, joka on hyväksytyn arvovälin ulkopuolella, LibreOffice Basic palauttaa virheilmoituksen.

Kun DateValue-funktiossa määritellään merkkijono, jossa on päivämäärä, DateSerial-funktiossa kukin parametri (vuosi, kuukausi, vuorokausi) käsitellään erillisenä numeerisena lausekkeena.

## Error codes:

5 Virheellinen proseduurikutsu

## Esimerkki:

    Sub ExampleDateSerial
    Dim lDate As Long
    Dim sDate As String
        lDate = DateSerial(1964, 4, 9)
        sDate = DateSerial(1964, 4, 9)
        msgbox lDate ' palauttaa arvon 23476
        msgbox sDate ' palauttaa 09.04.1964
    End Sub