Functie DateValue

Retourneert een Date-object uit een tekenreeks die een datum voorstelt.

Het geretourneerde object wordt intern weergegeven als een enkele numerieke waarde die overeenkomt met de opgegeven datum. Deze waarde kan worden gebruikt om het aantal dagen tussen twee datums te berekenen.

Syntaxis:


  DateValue(datum als tekenreeks)

Parameters:

date: een tekenreeks die de datum bevat die wordt geconverteerd naar een Date-object.

De tekenreeks die wordt doorgegeven aan DateValue moet worden uitgedrukt in een van de datumnotaties die zijn gedefinieerd door uw landinstelling (zie - Taalinstellingen - Talen) of gebruik de ISO datumformaat "jjjj-mm-dd" (jaar, maand en dag gescheiden door koppeltekens).

Geretourneerde waarde:

Date.

Foutcodes:

5 Ongeldige aanroep van procedure

Voorbeeld:


  Sub ExampleDateValue
      Dim aDate As Date
      aDate = DateValue("2021-12-20")
      ' Drukt de gelokaliseerde datum af
      MsgBox aDate
      ' Haalt het jaar, de maand en de dag uit het datumobject
      MsgBox Year(aDate)
      MsgBox Month(aDate)
      MsgBox Day(aDate)
      ' Drukt de numerieke waarde af die overeenkomt met de datum (als type Long)
      MsgBox CLng(aDate)
  End Sub

Functie DateSerial