Mega Code Archive

 

Categories / VisualBasic Script / Date Functions

 

Add value to Date

Sub AddADay()     Dim dtInitialDate As Date     dtInitialDate = DateAdd("d", 1, dtInitialDate)     Debug.Print dtInitialDate End Sub