Help - format with respect

  • Thread starter Thread starter markk hhoward
  • Start date Start date
M

markk hhoward

I want to change the format of the text box
and the combo box on the condition of a check box.
I can get the field's to lock and diable on check = -1
any ideas?
I want to change the look to flat instead of sunken



does anyone have a list of the avaliable codes??
ie:Forms!frmPlan![Pre-Con].SetFocus
or:Forms.frmPlan.[Pre-Con].Locked
 
Under the OnClick Event Procedure for your checked box type the following
statements. The Combo17 just happens to be the name of my combo box, so you
will replace the name given your combo box under Properties. The Value 2
equates to Sunken and 0 equates to Flat. So when I click my check box my
combo box gets a sunken look. When I unclick it it goes back to flat.

Private Sub Checked_Click()
If Checked = True Then
Me.Combo17.SpecialEffect = "2"
Else
Me.Combo17.SpecialEffect = "0"
End If
End Sub
 
Was just about to post the same thing till the person above
beat me to it. =)

You'll also need to set the SpecialEffect property of the
label as well. If you want to know each of the
SpecialEffect Values (0 for Flat, 1 is Raised, 2 for Sunken
etc.) just do a search on "SpecialEffect Property" using
the Microsoft Help (F1) tool.

Private Sub Check1_Click()

If Check1.Value = True Then
'0 is for Flat Effect
Combo1.SpecialEffect = 0
Combo1_Label.SpecialEffect = 0
ElseIf Check1.Value = False Then
'2 is for Sunken Effect
Combo1.SpecialEffect = 2
Combo1_Label.SpecialEffect = 2
End If

End Sub

-----Original Message-----
Under the OnClick Event Procedure for your checked box type the following
statements. The Combo17 just happens to be the name of my combo box, so you
will replace the name given your combo box under Properties. The Value 2
equates to Sunken and 0 equates to Flat. So when I click my check box my
combo box gets a sunken look. When I unclick it it goes back to flat.

Private Sub Checked_Click()
If Checked = True Then
Me.Combo17.SpecialEffect = "2"
Else
Me.Combo17.SpecialEffect = "0"
End If
End Sub


I want to change the format of the text box
and the combo box on the condition of a check box.
I can get the field's to lock and diable on check = -1
any ideas?
I want to change the look to flat instead of sunken



does anyone have a list of the avaliable codes??
ie:Forms!frmPlan![Pre-Con].SetFocus
or:Forms.frmPlan.[Pre-Con].Locked
Click to expand...


.
Click to expand...
 
Back
Top