Check Box to another form!

B

Bob

On my opening form I have a Yes/No Check Box that when is True make certain
Controls Visible, Is it possible to assign other controls on other forms to
that check box...Thanks For any help...Bob
 
L

Larry Linson

Bob said:
On my opening form I have a Yes/No Check
Box that when is True make certain Controls
Visible, Is it possible to assign other controls
on other forms to that check box...

Could you clarify "assign other controls on other forms to that check box"?
I am not familiar with the idea of "assigning other controls" to any
"control". A CheckBox can have a Value True or False -- True represented by
0, False represented by any non-0 value.

Larry Linson
Microsoft Access MVP
 
B

Bob

Bob said:
On my opening form I have a Yes/No Check Box that when is True make
certain Controls Visible, Is it possible to assign other controls on other
forms to that check box...Thanks For any help...Bob
Well I had a go but it seems I've got something wrong,
Table is: tblSetStableControlsSettings
Field Help: , Yes/No
Control : cmbHelp1ComName
Any Help Please......Bob
------------------------------------------------------------
Private Sub Form_Open(Cancel As Integer)
If DLookup("Help", "tblSetStableControlsSettings") Then
If Help = True Then
cmbHelp1ComName.Visible = True
If Help = False Then
cmbHelp1ComName.Visible = False

End If
End If
End If


End Sub
 
B

Bob

Thanks Larry, trying to get a Control on (frmCompanyInfo) to Visible/ No
Visible from a Check Box on my opening form (frmMain) which is linked to
tblSetStableSettings..............Thanks Bob
 
A

Andy Hull

Hi Bob

The following should work...

Private Sub Form_Open(Cancel As Integer)
If DLookup("Help", "tblSetStableControlsSettings") Then
me.cmbHelp1ComName.Visible = True
else
me.cmbHelp1ComName.Visible = False
End If

Assuming you already have a row of data in tblSetStableControlsSettings (and
only 1 row).

Alternatively, if your main form stays open then you don't need to use a
table...

If [Forms]![frm_form1]![ctl_checkbox] = True Then
me.cmbHelp1ComName.Visible = True
else
me.cmbHelp1ComName.Visible = False
End If

hth

Andy Hull
 
Top