Calendar control

[Kay]

Hi
When using the activex calendar control in access, What command to I
type in the button on the from to call up the calendar to input a date
in a text box.

Any help is much appreciated

 

[Guest]

Hi
When using the activex calendar control in access, What command to I
type in the button on the from to call up the calendar to input a date
in a text box.

Any help is much appreciated

Hi, first you will want to set the control source of your calendar to your
date field. Then, paste this code into your form module and change the name
of the form [Date Dialog] respectively.

"
Private Sub Calendar_Click()
On Error GoTo Err_Calendar_Click

Forms![Date Dialog]!OK.SetFocus
Exit_Calendar_Click:
Exit Sub
Err_Calendar_Click:
MsgBox Err.Description
Resume Exit_Calendar_Click

End Sub