DateSerial Function

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

Süntaks:


DateSerial (year, month, day)

Tagastusväärtus:

Kuupäev

Parameetrid:

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.

DateSerial fuktsioon tagastab andmetüübi Variant tüübiga VarType7 (Kuupäev). Sisemiselt salvestatakse see väärtus topeltväärtusena, seega kui kuupäev on 1.1.1900, siis tagastatav väärtus on 2. Negatiivsed väärtused vastavad kuupäevadele enne 30. detsembrit 1899 (v.a).

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.

Veakoodid:

5 Vigane protseduuri väljakutse

Näide:


  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 REM tagastab 04/09/1964
  End Sub