• Home
 · 
• Miscellaneous
 · 
• What was yesterday's date? what is tomorrows date? Use this to find out.

What was yesterday's date? what is tomorrows date? Use this to find out.

What was yesterday's date? what is tomorrows date? Use this to find out.

Rate What was yesterday's date? what is tomorrows date? Use this to find out.

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

'put two command buttons on your form.
'call one cmdTomorrow and one cmdYesterday
'copy this code into the controls.

Private Sub cmdYesterday_Click()
Dim Yesterday As Variant
'print yesterdays date
Yesterday = DateAdd("d", -1, Date)
Form1.Print Yesterday
End Sub

Private Sub Tomorrow_Click ()
'print tomorrow's date
Dim Tomorrow As Variant
Tomorrow = DateAdd("d",1,Date)
Form1.Print Tomorrow
End Sub