G
Guest
I have 3 checkboxes. The idea is that when one is checked it enables 2 other
text boxes. Here is the code:
Private Sub chkCourse_AfterUpdate()
If chkCourse = True Then
CheckBoxTrue 1
Me!Where.Enabled = True
Me!When.Enabled = True
Else:
Me!When.Enabled = False
Me!Where.Enabled = False
CheckboxFalse 1
DeleteRecordset "TypeOfParticipantInfo"
End If
End Sub
The problem is I am getting this error message "Run-Time error 438" Object
doesn't support this property or method. Is that the Enabled property is not
supported by check boxes?
Thanks for your help
text boxes. Here is the code:
Private Sub chkCourse_AfterUpdate()
If chkCourse = True Then
CheckBoxTrue 1
Me!Where.Enabled = True
Me!When.Enabled = True
Else:
Me!When.Enabled = False
Me!Where.Enabled = False
CheckboxFalse 1
DeleteRecordset "TypeOfParticipantInfo"
End If
End Sub
The problem is I am getting this error message "Run-Time error 438" Object
doesn't support this property or method. Is that the Enabled property is not
supported by check boxes?
Thanks for your help