I have a subform which I want to be

[zrobinso]

I have a subform which I want to become visible if a check box field is checked. I am using the following Event procedure on the check box. It works if you open the main form to add new records. How can I keep the subform not visible when not checked if you are scrolling through records from check to not checked??


Private Sub Option94_Click()

If Me.Option94 Then
Me.frm_SubfrmEmpInfo.Visible = True
Else
Me.frm_SubfrmEmpInfo.Visible = False
End If

End Sub

Thanks for Any help.

Z

 

[joshkay]

if you put this code in the main forms on_current property that should fix change the subform when needed.

hope that helps

 

[zrobinso]

Thanks joshkay. This does the job perfectly.

 

[StuGreentree]

I'm assuming that Option94 is a control on the form from which you are scrolling records. If so try this...

Private Sub Form_Current()
If Me.Option94 Then
Me.frm_SubfrmEmpInfo.Visible = True
Else
Me.frm_SubfrmEmpInfo.Visible = False
End if
End Sub

You can streamline this even more by setting the subForm.visible to False and the just turning it on when Option94 is true..... Stu