Date Functions VisualBasic Script

  1. Home
  2. VisualBasic Script
  3. Date Functions
  4. Add value to Date
Sub AddADay()
    Dim dtInitialDate As Date
    dtInitialDate = DateAdd("d", 1, dtInitialDate)
    Debug.Print dtInitialDate
End Sub