Date Time VB.Net Tutorial

public class Test
   public Shared Sub Main
        Dim dteExpiration As Date
        Dim lngDays As Long
        lngDays = DateDiff(DateInterval.Day, #12/31/2000#, Now())
        Console.WriteLine(lngDays)
   End Sub
End class
2322