Calender display

  • Thread starter CharlesCount via AccessMonster.com
  • Start date
C

CharlesCount via AccessMonster.com

Can some one assist me? I would like to temporarely display the calender and
select the date in a form and capture the desired date.
I am a novice at this

Charles
 
L

Linq Adams via AccessMonster.com

If you'd like to only have the calendar appear when you need to pick a date,
you can use this routine.

YourTextBoxName is the name of the box that will hold the date

YourCalendarName is the name of your calendar.

First, place the calendar where you want it to appear on the form.

Next, select the calendar and goto Properties--Format and set Visible = No

Then place this code in the form's code module:

Private Sub Form_Load()
YourCalendarName = Date
End Sub

Private Sub YourCalendarName_Click()
YourTextBoxName = YourCalendarName
YourTextBoxName.SetFocus
YourCalendarName.Visible = False
End Sub

Private Sub YourTextBoxName_DblClick(Cancel As Integer)
YourCalendarName.Visible = True
End Sub

Now, when your user DoubleClicks on the textbox where the date will go, the
calendar will appear. The date is picked, and the calendar disappears!
 
Top