DateSerial Function

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

DateSerial (year, month, day)

Kuupäev

Year: aastat näitav täisarvavaldis. Väärtusi vahemikus 0 kuni 99 tõlgendatakse aastatena 1900-1999. Sellest vahemikust väljaspool olevate aastate korral tuleb sisestada kõik neli numbrit.

Month: määratud aasta kuud näitav täisarvavaldis. Sobiv vahemik on 1-12.

Day: määratud kuu päeva näitav täisarvavaldis. Sobiv vahemik on 1-31. Lühemate kui 31-päevaste kuude puhul ei tagastata olematu päeva sisestamisel veateadet.

DateSerial funktsioon tagastab ajavahemikus 30. detsembrist 1899 tänase kuupäevani olevate päevade arvu. Selle funktsiooni abil saad arvutada kahe kuupäeva vaheliste päevade arvu.

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).

Kui defineeritud kuupäev asub väljaspool lubatud piire, siis tagastab LibreOffice BASIC veateate.

Kui määratled DateValue funtsiooni kuupäeva sisalava stringina, hindab DateSerial funktsioon kõiki parameetreid (aasta, kuu, päev) eraldi arvavaldistena.

  Sub ExampleDateSerial
  Dim lDate As Long
  Dim sDate As String
      lDate = DateSerial(1964, 4, 9)
      sDate = DateSerial(1964, 4, 9)
      msgbox lDate REM tagastab 23476
      MsgBox sDate ' returns 1964-04-09 in ISO 8601 format
  End Sub