Event procedure on Complete date

[Riaang]

Hi,

Can anybody give me the event procedure if I want a date to appear once the user has ticked the comleted box on the form.

The date must be locked so that it is system generated and not changed by the user.

Thanks

 

[bat17]

Assuming that you have a field for the date called [txtDate] which is locked, and a checkbox called chkDone then the following should do what you want.

Private Sub chkDone_Click()
If Me![chkDone] = True And IsNull(Me![txtDate]) Then
Me![txtDate].Locked = False
Me![txtDate] = Now()
Me![txtDate].Locked = True
End If
End Sub

HTH

Peter