Inhoud

# Functie DateSerial

Retourneert een Datum-waarde voor een opgegeven jaar, maand en dag.

### Syntaxis:

    DateSerial (jaar, maand, dag)

### Retourtype:

Datum

### Parameters:

Jaar: Integer die het jaar aangeeft. Alle waardes tussen 0 en 99 worden opgevat als de jaren 1900-1999. Voor andere jaarargumenten moet u alle vier cijfers invoeren.

Maand: Integer die de maand van het gespecificeerde jaar aangeeft. Het geaccepteerde bereik ligt tussen 1 en 12.

Dag: Integer expressie die de dag van de opgegeven maand aangeeft. Het geaccepteerde bereik is van 1-31. Er wordt geen fout geretourneerd wanneer u een niet-bestaande dag invoert voor een maand korter dan 31 dagen.

De Functie DateSerial geeft het aantal dagen tussen 30 december 1899 en de opgegeven datum terug. U kunt deze functie gebruiken om het verschil tussen twee datums te berekenen.

De functie DateSerial retourneert het gegevenstype Variant met VarType 7 (Datum). Intern wordt deze waarde opgeslagen als een Double-waarde, zodat wanneer de opgegeven datum 01-01-1900 is, de geretourneerde waarde 2 is. Negatieve waardes komen overeen met datums vóór 30 december 1899 (niet inclusief).

Als een datum wordt gedefinieerd die buiten het geaccepteerd bereik ligt geeft LibreOffice Basic een foutboodschap terug.

Het verschil met de functie DateValue is dat u daar het functieargument definieert als een tekenreeks die de datum bevat. In tegenstelling daarmee evalueert de functie DateSerial elk van de parameters (jaar, maand, dag) als gescheiden numerieke expressies.

### Foutcodes:

5 Ongeldige aanroep van procedure

### Voorbeeld:

      Sub ExampleDateSerial
      Dim lDate As Long
      Dim sDate As String
          lDate = DateSerial(1964, 4, 9)
          sDate = DateSerial(1964, 4, 9)
          MsgBox lDatum ' geeft 23476 terug
          MsgBox sDate ' retourneert 04-09-1964 in ISO 8601-indeling
      End Sub

Help ons, alstublieft!