Forum Moderators: open
FromDate = Month(Now()) - 3 & "/" & Day(Now()) & "/" & Year(Now())
ToDate = Now() FromDate = (Now() - 3)
You can also look at the datediff function. Just google datediff.
This will also work. I think you're having problems with string to date conversion.
Dim myDate As Date = CType("2/9/2006", Date) myDate.AddMonths(-3).ToShortDateString()