Year Function
Liveras la jaron el data numero generita de la funkcio DateSerial aÅ DateValue.
Sintakso:
Year (Number)
Liverota valoro:
Entjero
Parametroj:
Number: Entjera esprimo kiu donas la datan numeron por kalkuli la jaron.
Ĉi tiu funkcio estas la kontraÅo de la funkcio DateSerial, kaj liveras la jaron de data numero. Ekzemple, la esprimo:
Print Year(DateSerial(1994, 12, 20))
liveras la valoron 1994.
Ekzemplo:
Sub ExampleYear
MsgBox "" & Year(Now) ,64,"Nuna jaro"
End Sub