Active, Inactive textboxes

I have a form needs to be filled out. A lot of the questions are a yes/
no question. When they pick yes I want some other textboxes to be
active, and when they pick no I want the textboxes to be inactive.
Example - A question could be: Do you have siblings. If you check yes,
then other line would appear to say How many (other textboxes are
active)? If you say no, then it skips to the next question (other
textboxes are inactive - greyed out).
How do I do this? If it includes coding, can I get help with the
coding.

On Aug 6, 2:08*pm, AccessDB wrote:
I have a form needs to be filled out. A lot of the questions are a yes/
no question. When they pick yes I want some other textboxes to be
active, and when they pick no I want the textboxes to be inactive.
Example - A question could be: Do you have siblings. If you check yes,
then other line would appear to say How many (other textboxes are
active)? If you say no, then it skips to the next question (other
textboxes are inactive - greyed out).
How do I do this? If it includes coding, can I get help with the
coding.

in the afterupdate of your checkbox, set the Enabled property of the
relevant textboxes.

Sub MyCheckBox_AfterUpdate()
Me.txt1.Enabled=(MyCheckBox=Checked)
Me.txt2.Enabled=Not (MyCheckBox=Checked)
End Sub

On Aug 6, 4:36*pm, Piet Linden wrote:
On Aug 6, 2:08*pm, AccessDB wrote:

I have a form needs to be filled out. A lot of the questions are a yes/
no question. When they pick yes I want some other textboxes to be
active, and when they pick no I want the textboxes to be inactive.
Example - A question could be: Do you have siblings. If you check yes,
then other line would appear to say How many (other textboxes are
active)? If you say no, then it skips to the next question (other
textboxes are inactive - greyed out).
How do I do this? If it includes coding, can I get help with the
coding.

in the afterupdate of your checkbox, set the Enabled property of the
relevant textboxes.

Sub MyCheckBox_AfterUpdate()
* * Me.txt1.Enabled=(MyCheckBox=Checked)
* * Me.txt2.Enabled=Not (MyCheckBox=Checked)
End Sub

I'm new to coding so in your code Me.txt1.Enabled=(MycheckBox=Checked)
- is the txt1 the name of my textbox on my form? If so, then what is
the second line of code for?

Piet's code assumes you have two text boxes (one named txt1, one named txt2)
and that you want txt1 to be enabled when the check box (named MyCheckBox)
is checked and disabled when it's not checked. and that you want txt2 to be
disabled when the check box is not checked and enabled with it is. Change
the names of MyCheckBox, txt1 and txt2 as appropriate.

However, there's a mistake in the code.

It should simply be

Sub MyCheckBox_AfterUpdate()
Me.txt1.Enabled=Me.MyCheckBox
Me.txt2.Enabled=Not Me.MyCheckBox
End Sub

Check boxes are either True or False. There's no reason for a variable named
Checked.

--
Doug Steele, Microsoft Access MVP
http://I.Am/DougSteele
(no e-mails, please!)


"AccessDB" wrote in message
...
in the afterupdate of your checkbox, set the Enabled property of the
relevant textboxes.

Sub MyCheckBox_AfterUpdate()
Me.txt1.Enabled=(MyCheckBox=Checked)
Me.txt2.Enabled=Not (MyCheckBox=Checked)
End Sub

I'm new to coding so in your code Me.txt1.Enabled=(MycheckBox=Checked)
- is the txt1 the name of my textbox on my form? If so, then what is
the second line of code for?

On Aug 7, 2:38*pm, "Douglas J. Steele"
wrote:
Piet's code assumes you have two text boxes (one named txt1, one named txt2)
and that you want txt1 to be enabled when the check box (named MyCheckBox)
is checked and disabled when it's not checked. and that you want txt2 to be
disabled when the check box is not checked and enabled with it is. Change
the names of MyCheckBox, txt1 and txt2 as appropriate.

However, there's a mistake in the code.

It should simply be

Sub MyCheckBox_AfterUpdate()
* Me.txt1.Enabled=Me.MyCheckBox
* Me.txt2.Enabled=Not Me.MyCheckBox
End Sub

Check boxes are either True or False. There's no reason for a variable named
Checked.

--
Doug Steele, Microsoft Access MVPhttp://I.Am/DougSteele
(no e-mails, please!)

"AccessDB" wrote in message

...

in the afterupdate of your checkbox, set the Enabled property of the
relevant textboxes.

Sub MyCheckBox_AfterUpdate()
Me.txt1.Enabled=(MyCheckBox=Checked)
Me.txt2.Enabled=Not (MyCheckBox=Checked)
End Sub

I'm new to coding so in your code Me.txt1.Enabled=(MycheckBox=Checked)
- is the txt1 the name of my textbox on my form? If so, then what is
the second line of code for?

Thank you it works. But how do I have the questions below the Yes/No
question to be Disabled/Inactive until I pick Yes.
Example: First question - Do you have any any siblings?
Second question - How many
I want the "How Many" question to be Disabled/Inactive until Yes is
picked.
Here is my actual code so far:
Sub txtIs_AfterUpdate()
Me.txtApplication.Enabled = Me.txtIs
End Sub

What do I need in addition to the code to make this work.

In the form's Current event, set the Enabled property for all of the
relevant controls to False.

--
Doug Steele, Microsoft Access MVP
http://I.Am/DougSteele
(no private e-mails, please)


"AccessDB" wrote in message
...
On Aug 7, 2:38 pm, "Douglas J. Steele"
wrote:
Piet's code assumes you have two text boxes (one named txt1, one named
txt2)
and that you want txt1 to be enabled when the check box (named MyCheckBox)
is checked and disabled when it's not checked. and that you want txt2 to
be
disabled when the check box is not checked and enabled with it is. Change
the names of MyCheckBox, txt1 and txt2 as appropriate.

However, there's a mistake in the code.

It should simply be

Sub MyCheckBox_AfterUpdate()
Me.txt1.Enabled=Me.MyCheckBox
Me.txt2.Enabled=Not Me.MyCheckBox
End Sub

Check boxes are either True or False. There's no reason for a variable
named
Checked.

--
Doug Steele, Microsoft Access MVPhttp://I.Am/DougSteele
(no e-mails, please!)

"AccessDB" wrote in message

...

in the afterupdate of your checkbox, set the Enabled property of the
relevant textboxes.

Sub MyCheckBox_AfterUpdate()
Me.txt1.Enabled=(MyCheckBox=Checked)
Me.txt2.Enabled=Not (MyCheckBox=Checked)
End Sub

I'm new to coding so in your code Me.txt1.Enabled=(MycheckBox=Checked)
- is the txt1 the name of my textbox on my form? If so, then what is
the second line of code for?

Thank you it works. But how do I have the questions below the Yes/No
question to be Disabled/Inactive until I pick Yes.
Example: First question - Do you have any any siblings?
Second question - How many
I want the "How Many" question to be Disabled/Inactive until Yes is
picked.
Here is my actual code so far:
Sub txtIs_AfterUpdate()
Me.txtApplication.Enabled = Me.txtIs
End Sub

What do I need in addition to the code to make this work.