DateSerial Function

Returns a Date value for a specified year, month, and day.

Syntaksi:


DateSerial (vuosi1, kuukausi1, pv1)

Paluuarvo:

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.

The DateSerial function returns the data type Variant with VarType 7 (Date). Internally, this value is stored as a Double value, so that when the given date is 1900-01-01, the returned value is 2. Negative values correspond to dates before December 30, 1899 (not inclusive).

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.

Virhekoodit:

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 ' returns 1964-04-09 in ISO 8601 format
  End Sub