[RESOLVED] adding time

[Hack]

Private Sub Command1_Click()
timee =  DateAdd("n", 3, timee)
End Sub