Setting textbox to accept data after a check box has been checked

[Redbeard]

I am Newbie using Access 2003. I am trying to have one list box and one textbox on my form grayed out (not useable) until a check box has been checked. Is there a simple way of doing this?

[Rabbit]

You'll have to use the VBA editor and the After Update event. Whether or not that's difficult for you I wouldn't know. Let us know if you understand any of that.

[Redbeard]

I know how to insert code into the VBA editor, however I do not posses the skills to write the code on my own (would love to learn, never the time). If someone has existing code that will do this and I can copy it into the right spot changing the names of the appropriate boxes and forms to match. If there is no code then I guess I am out of luck. I was hoping there was just a property setting that would do it, but things are never as easy as they appear.

[missinglinq]

I think this will do what you need. You have to set the Enabled Properties for YourTextBox and YourListBox to No in their property boxes, then use this code:

Private Sub Form_Current()
If Not Me.NewRecord Then
 If YourCheckBox Then
   YourListBox.Enabled = True
   YourTextBox.Enabled = True
 Else
   YourListBox.Enabled = False
   YourTextBox.Enabled = False
 End If
Else
 YourListBox.Enabled = False
 YourTextBox.Enabled = False
End If
End Sub
 

and

Private Sub YourCheckBox_Click()
If YourCheckBox Then
  YourListBox.Enabled = True
  YourTextBox.Enabled = True
Else
  YourListBox.Enabled = False
  YourTextBox.Enabled = False
End If
End Sub
 

Welcome to TheScripts!

Linq ;0)>

[Redbeard]

Hi Missinglinq

Thanks for the code, but it is not working as intended yet. When I set my checkbox Enable property to NO all my records even ones that are already checked are disabled. Then when I check any record that is not checked, it enables the textbox and listbox in all my records. When I uncheck it, it disables the textbox and listbox in all my records. Is there something that the code needs to make it to target only the record it is currently on? Any help would be great!

Thanks

[Redbeard]

I final got it working... some of my code on Current was screwing it up.

Thanks!

[missinglinq]

Glad you got it working!

Linq ;0)>