I have a field control (DateReceived) which is populated with a date selected from a popup calendar. I have coded the afterupdate with the following code below to lock the field. When the date is populated into the DateReceived field with the popup calendar you can close the popup calendar but the I-beam remains in the field allowing you to change the date and time, albeit with an error message, but none the less it changes and saves.
What I am trying to accomplish is to not allow a date from the popup calendar entered in to the field to be less than the current date and to disable the ability to enter data manually into the field or to change the date entered in the field from the popup calendar.
Thank you for any assistance you can provide
Private Sub DateReceived_AfterUpdate()
If Not IsNull(Me.DateReceived) Then
Me.DateReceived.Locked = True
Me.DateReceived.BackStyle = "Transparent"