Tick Box Hides Text Box

[Arrrggggjhhhhh!!!!]

I've put a tick box on my form which , when ticked, hides a text box (called text41).

The tick box is called Check45.

Basically, I wrote an event based on various posts I have been looking at.

Private Sub Check45_Click()
If Active Then
If Not Me.NewRecord Then
Text41.Visible = False
Else
Text41.Visible = True
End If
End Sub

This is in the event part of the property sheet, the On click part.

Anyway, I cannot get it to work. I get a compile error whcih says,

Compile error. Block if without End If.

Any ideas anyone?

[pbaldy]

You started 2 If/Then blocks but only ended 1.

[alansidman]

Try adding a second End If after the first End If.

Alan

[Arrrggggjhhhhh!!!!]

Doh!!! How daft am I??

[pbaldy]

This was a rare case of the error message actually being an accurate description of the problem.