>Certainly looks like a lot of code :-}
>How about:

Dim earlierDate As New DateTime(2009, 9, 15, 10, 40, 20)
>Dim timespan As TimeSpan = DateTime.Now.Subtract(earlierDate)
>Dim difference As New DateTime(timespan.Ticks)
>Console.WriteLine("Years: {0} Months: {1} Days {2}", difference.Year, difference.Month, difference.Day)
>

Thanks, but Console.WriteLine() doesn't do anything in my application.

Also, I tried to replace that to Message.Box() but was unable do. Basically, how can we get the equivalent into a variable?