DTPicker checkbox event

I'm using a DTPicker in my project. I want to set its value to today when the user changes the DTPicker's checkbox from unchecked to checked. I'm not binding it to any data - its just standalone.

I don't have a problem with setting the date to today, but I can't find a way of telling when the user has changed the checkbox to checked. The _Click event is no good because this fires when the dd/mm/yy section is clicked as well.

Can anyone help?

When the CheckBox is unchecked the Value property becomes Null, so the Click event can still be used.

VB Code:

Private Sub DTPicker1_Click()
    If IsNull(DTPicker1.Value) Then
        DTPicker1.Value = Now
        DTPicker1.Value = Null
    End If
End Sub

Thanks, but this doesn't work for me. I don't want the date to be set to today when the user unchecks the box, only when they check it.

Any further thoughts?

Put the above code in the MouseDown event of the DatePicker.

Good solution Bruce. Thanks.