DateAdd: add or subtract a specified time interval from a date.
Example:
Label1.Text = Date.Now
Label2.Text = DateAdd(DateInterval.Day, 1, Date.Now)
Label3.Text = DateAdd(DateInterval.Month, 1, Date.Now)
Label4.Text = DateAdd(DateInterval.Year, 1, Date.Now)
