An if statement and a combo box... 1

[SeadnaS]

OK, i have a combo box which lists some numbers. The numbers come from a table called specs i'm using a SELECT DISTINCT for the combo box so it doesn't show duplicate numbers.

I have an if statement that checks to see if the number selected in the combo box matches a number selected in another combo box and displays a "!" in a text box if it doesn't match.

My problem is that when i select the matching number again the "!" doesn't go away. Does anyone know what i might be doing wrong. Here's the VBA code:

If Me.MODEL_NO.Column(6) = Me.QRBP_PRESSURE.Value Then

Me.qrbp_test.Value = ""
Else: Me.qrbp_test.Value = "!"

End If

 

[PHV]

Here's the VBA code
And where is this code ?

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886

 

[SeadnaS]

Its in the On Update event of the combo box.

 

[PHV]

On Update event of the combo box
Really ???

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886

 

[dhookom]

You shouldn't need code since the calculated value shouldn't typically be saved. Try set the control source of the text box to:

 =IIf(Model_NO.Column(6) = QRBP_PRESSURE.Value,"" ,"!")

Duane
Hook'D on Access
MS Access MVP

 

[dhookom]

I forgot to ask if you understand that columns are numbered beginning with 0 not 1.

Duane
Hook'D on Access
MS Access MVP

 

[SeadnaS]

Yes i figured that one out myself!

Thanks for the help dh!