Checkbox not working right

[NISMOJim]

Here's a strange little thing that's got me stumped...

My form has a label whose Visible property is set to No. The form On Open property makes the label visible. On the On Click property of a checkbox on the form is the following code...

If Me.chkPreInsp = Yes Then
Me.lblStud.Visible = False
Else:


Me.lblStud.Visible = True
End If

When I check the box, the label stays visible. When I uncheck it, the label disappears. I changed the If statement from Yes to No, with the exact same effect. I also tried "Yes", "YES", "No", "NO", 0, 1, True and False, but the label only disappears when the box is unchecked, which is the opposite of what I want. This has got to be something small that will make me feel stupid, but I'm prepared for that!

[June7]

An If Then Else is not necessary. This works for me:

Me.lblStud.Visible = Me.chkPreInsp = True

[ItsMe]

AFAIK both Yes and True are constants in VBA. They both equal -1.

If you place quotes around True or False then, VBA will interpret the literal text, not the constant.

Having said that, I always use -1 for Yes and 0 for No in VBA. I use True and False in SQL.

If Me.chkPreInsp = True Then
Me.lblStud.Visible = 0
Else
Me.lblStud.Visible = -1
End If

Notice that Else is not followed with a colon in the above example. You would use a colon to indicate you are going to continue your code on the same line.
If Me.chkPreInsp = True Then Me.lblStud.Visible = 0 Else: Me.lblStud.Visible = -1

[NISMOJim]

OK June, that goes against everything I thought I knew...2 equal signs in the same statement? But it works! Thanks for the help.

[June7]

As I understand it, the first equal sign defines the left and right sides of expression. Do this test in the VBA immediate window:

?(1 + 2)=(1 + 2)

?True = (1 + 2 = 3)

?True = True = False