TimeSpan and Date Substract : TimeSpan « Date Time « VB.Net Tutorial

1. VB.Net Tutorial
2. Date Time
3. TimeSpan

Public Class Tester
    Public Shared Sub Main
        Dim birthDay As Date
        Dim lifeTime As TimeSpan
        Dim lifeDays As Integer


        birthDay = Date.Parse("December 25, 2007")
        lifeTime = Now.Subtract(birthDay)
        lifeDays = lifeTime.Days
        Console.WriteLine(String.Format( _
           "There are {0} days between {1:D} and {2:D}", _
           lifeDays, birthDay, Now))
    End Sub
End Class

There are -227 days between December 25, 2007 and May 11, 2007