Date Control (1 Viewer)

[gregorg]

Hi I have a date control and on the Click event I run the following code.
Trouble is the Date Control stops working, ie you can't change the date after one click ?

CODE.

Private Sub Calendar7_Click()


weekofyeartxt.Value = DatePart("ww", Calendar7.Value)


End Sub

Thanks.

 

[missinglinq]

• What version of Access are you running?
• What kind of DatePicker are we talking about? ActiveX Control? Form-based? Third-party Control?
• I would try running the code from the AfterUpdate event, rather than from the OnClick event. The OnClick events of Controls are frequently notoriously fickle, not firing when you would expect them to:

Private Sub Calendar7_AfterUpdate()
  Me.weekofyeartxt.Value = DatePart("ww", Me.Calendar7.Value)
End Sub

Linq ;0)>

 

[gregorg]

Hi its a MSCAL.Calendar.7 Calendar Control 12.0 and it stop working for date picking with no code behind the event at all ? Can you download better controls ?

It is Access 2007.

 

[missinglinq]

There are many, many threads here, and elsewhere, concerning problems with using these calendars with Versions 2007 and later. Why aren't you using the native DatePicker? By default, when entering a Control that is Bound to DateTime Field, a small calendar icon appears next to the Control. Click on it and the calendar pops up. You can even automate it so that the calendar pops up when you enter the Control.

Linq ;0)>