Active, Inactive textboxes

A

AccessDB

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.
 
P

Piet Linden

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
 
A

AccessDB

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?
 
D

Douglas J. Steele

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

(no e-mails, please!)


AccessDB said:
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?
 
A

AccessDB

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!)





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.
 
D

Douglas J. Steele

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

--
Doug Steele, Microsoft Access MVP

(no private e-mails, please)


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!)





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.
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top