<div>
In the Checkbox's AfterUpdate event:<br />
<br />
Private Sub Checkbox1_AfterUpdate()<br />
&nbsp; &nbsp;Select Case Checkbox1<br />
&nbsp; &nbsp; &nbsp; Case True<br />
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp;Me!Date.Enabled = False<br />
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp;Me!Date.Locked = True<br />
&nbsp; &nbsp; &nbsp; Case False<br />
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp;Me!Date.Enabled = True<br />
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp;Me!Date.Locked = False<br />
&nbsp; &nbsp;End Select<br />
End Sub
</div>


In the Checkbox's AfterUpdate event:

Private Sub Checkbox1_AfterUpdate()
   Select Case Checkbox1
      Case True
         Me!Date.Enabled = False
         Me!Date.Locked = True
      Case False
         Me!Date.Enabled = True
         Me!Date.Locked = False
   End Select
End Sub

<div>
<div class="content wysiwyg-content">
Want to have a CHECKBOX (completed task) and if checked, another field (Date) can be unlocked to fill in. &nbsp;If not, date field cannot be filled in.
</div>
</div>


Want to have a CHECKBOX (completed task) and if checked, another field (Date) can be unlocked to fill in.  If not, date field cannot be filled in.

UNLOCK control using CHECKBOX

Microsoft Access is a rapid application development (RAD) relational database tool. Access can be used for both desktop and web-based applications, and uses VBA (Visual Basic for Applications) as its coding language.