Mega Code Archive
Different date between two dates
<![CDATA[
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
]]>