Thursday, June 3, 2010

Find difference between two dates.

Dim MyDate, MyReturn
MyDate = "January 11, 1981"
MyCurDate = Date
MyReturn = DateDiff("YYYY", MyDate, MyCurDate)
MsgBox MyReturn

No comments: