Functie Year

Geeft het jaar uit een serieel datum-getal dat gegenereerd is met DateSerial of DateValue terug.

Syntaxis:


Year (Getal)

Integer

Getal: Integer die het seriële datumgetal bevat waaruit het jaar wordt berekend.

Deze functie is het tegenovergestelde van de DateSerial-functie en geeft het jaar van een seriële datum terug. Bijvoorbeeld, de expressie


Print Year(DateSerial(1994, 12, 20))

geeft de waarde 1994 terug.

5 Ongeldige aanroep van procedure


Sub ExampleYear
    MsgBox "" & Year(Now) ,64,"Het huidige jaar is:"
End Sub