How do I enter today's date in box double click

  • Thread starter Thread starter mark
  • Start date Start date
M

mark

I want to double click a box on a form so that it enters
today's date. I also want it to display a message "Are
you sure", and "Cancel". How do I do this?

Thanks Mark Allsop
 
I want to double click a box on a form so that it enters
today's date. I also want it to display a message "Are
you sure", and "Cancel". How do I do this?

Thanks Mark Allsop
Click to expand...

Code the Date control's Double-click event:

If MsgBox("Are you sure?", vbOKCancel) = vbOK Then
Me![ADate] = Date
Else
Cancel = True
End If
 
Back
Top