Here is a way to launch a calendar control against an unbound textbox on a user form.
Yes, you can simply add a field to a form and specify the Format attribute to be a date format (e.g. Medium Date) and then ensure the Show Date Picker field is set to For Dates. The user won’t see the calendar option until they move to that field. Nothing wrong with this approach. I am just providing an alternative.
Let’s assume that there is a textbox on a form named txtDate and a button called cmdShowCal. The textbox’s Show Data Picker attribute is set to Never. The Click event for the button will look like:
Private Sub cmdShowCal_Click()
Me.txtDate.ShowDatePicker = 1
Me.txtDate.SetFocus
DoCmd.RunCommand acCmdShowDatePicker
End Sub
