extracting the year out of a date variable

hi,

does anyone know how to extract the year value out of a date variable? for example, if i had like #3/15/99# stored in a date variable, i would like to have a function that would return #1999# as a date variable. i tried working w/ both the Year() and DatePart("y", var) and DatePart("yyyy", var) function, and none of them work.

for example:
dim YearDate as Date
dim CurrentDate as Date

CurrentDate = #3/15/99#
YearDate = Year(CurrentDate)

but YearDate becomes #1905/06/21#, what's going on?

thanks a lot
yu-kuan