Make a Label Box Visible if Yes/No value is Checked

[airpjxxii]

Is there anyone who can help me regarding the above subject?

My situation is that I have a field (with property set as as Yes/No) and I would like to use this to activiate the visibility of another field.

For example:

A student is a foreigner, he will mark the box checked (Are you a Foreigner?)then a label will appear beside it where he can put his nationality.

Thanks a lot...

[ADezii]

Is there anyone who can help me regarding the above subject?

My situation is that I have a field (with property set as as Yes/No) and I would like to use this to activiate the visibility of another field.

For example:

A student is a foreigner, he will mark the box checked (Are you a Foreigner?)then a label will appear beside it where he can put his nationality.

Thanks a lot...

Assuming your Controls are named chkForeigner and txtNationality, then, in the AfterUpdate() Event of chkForeigner:

Private Sub chkForeigner_AfterUpdate()
If Me![chkForeigner] Then
  Me![txtNationality].Visible = True
Else
  'No Nationality should be listed if not a Foreigner
  Me![txtNationality] = Null
  Me![txtNationality].Visible = False
End If
End Sub

Additional points to consider:

1. The Visible Property of txtNationality should initially be set to No in the Control's Properties.
2. For Viewing purposes, you may also wish to place this code in the Form's Current() Event. If the individual is a Foreigner, then the Nationality Text Box will be visible, if he/she is not, then it won't.

[missinglinq]

First off, your user cannot enter data in a "label box," data is entered in a textbox!

Place a textbox on your form.

Select it and goto Properties - Format and set the Visible Property to No.

Now place this code in the code module of your form:

Private Sub AreYouAForeignerCheckBox_AfterUpdate()
If AreYouAForeignerCheckBox = -1 Then
 Me.NationalityTextBox.Visible = True
 Me.NationalityTextBox.SetFocus
Else
 Me.NationalityTextBox = ""
 Me.NationalityTextBox.Visible = False
End If
End Sub
 
Private Sub Form_Current()
 If AreYouAForeignerCheckBox = -1 Then
 Me.NationalityTextBox.Visible = True
Else
 Me.NationalityTextBox.Visible = False
End If
End Sub
 

This code does what you've requested and makes the textbox visible then sets focus on it, and if the user realizes that he/she has made a mistake and unchecks the box, it empties the data from the NationalityTextBox then makes it invisible again.

Welcome to TheScripts!

Linq ;0)>

[missinglinq]

Didn't mean to steps on your toes, ADezii! Clicked on Submit and took "Puck the Magic Chow Hound" out for his morning stroll, got back and saw that it had timed-out. Didn't think to see if anyone else had answered, just clicked again!

Linq ;0)>

[ADezii]

Didn't mean to steps on your toes, ADezii! Clicked on Submit and took "Puck the Magic Chow Hound" out for his morning stroll, got back and saw that it had timed-out. Didn't think to see if anyone else had answered, just clicked again!

Linq ;0)>

Never a problem, linq.

[NeoPa]

You have two perfectly good examples of the type of code you need here. In essence, you simply set the .Visible property of your TextBox (not label) control to the CheckBox value. If the CheckBox is checked then .Visible will be set to TRUE, otherwise it will be set to FALSE.

[ADezii]

You have two perfectly good examples of the type of code you need here. In essence, you simply set the .Visible property of your TextBox (not label) control to the CheckBox value. If the CheckBox is checked then .Visible will be set to TRUE, otherwise it will be set to FALSE.

Linq and I come from the same part of the Country, and consequently think alike to the point that it is almost scary! (LOL).

[NeoPa]

Forget 'Almost' ADezii ;)