How about somethin like this.
Private Sub cboMyCombo_AfterUpdate()
Me.txtBox1.FontWeight = IIf(Me.cboMyCombo = "value1",
"Normal","Bold")
Me.txtBox2.FontWeight = IIf(Me.cboMyCombo = "value2",
"Normal","Bold")
Me.txtBox3.FontWeight = IIf(Me.cboMyCombo = "value3",
"Normal","Bold")
Me.txtBox4.FontWeight = IIf(Me.cboMyCombo = "value4",
"Normal","Bold")
Me.txtBox5.FontWeight = IIf(Me.cboMyCombo = "value5",
"Normal","Bold")
Me.txtBox6.FontWeight = IIf(Me.cboMyCombo = "value6",
"Normal","Bold")
End Sub
Jim
Private Sub Form_Current()
Call cboMyCombo_AfterUpdate
End Sub
-----Original Message-----
Is there a way to view the code that is used for
conditional formatting used on forms? Would like to use the
concepts in VB to manipulate six conditions rather than
just 3 conditions