How to ADD days to a DATE Variable?

[Rexyss]

I have Dates in this format, stored i a database:
"01-07-2007 09:45:00"

I Read the date into a Variable:
Dim Date1 as Date
Date1 = "01-07-2007 09:45:00"

Now i need a way to tell,then i press Button1,
if NOW is more when 90 days after Date1

 

[giadich]

you can use the datediff or dateadd function for this purpose.

 

[.paul.]

datediff + dateadd are legacy code. you can use .addDays

Dim Date1 As Date
Date1 = "01-07-2007 09:45:00"
If Now > Date1.AddDays(90) Then
   MsgBox("Date1 is more than 90 days ago.")
End If