There is a built in calendar control in MSAccess, but its easy enough
to roll your own.
Place 42 identical (you don't really need this many) invisible toggle
controls in a 7x6 frame on a new form
Toggle1...Toggle42
In the OnOpen define which of the controls is the starting point based
on the DOW of your default date. Set it to visible and its caption to
"1" Increment your counter and toggle button and repeat until all the
days in the month are used up.
Save your form
In your Main form, Place a command to open the Calendar box in the
OnEnterEvent. Open it as a Modal Dialog box. Pass it the default date
if you like via OpenArgs
Now in your calendar form, Place some code in the OnClose to push the
date selected into the calling Control
screen.ActiveForm.ActiveControl = dtmMine or thereabouts.
Or pass it to a global variable or hard code the reference, or
whatever naughty method you prefer
If you want to change the month & year, you will need to modify the
code accrdingly. I want to be able to cancel as well as up date, ditto
