Selecting Items in a combo box

[Ferdi]

Hi,

If I select the product "orange" from a drop down list of a combo box how do i script that in the after update. The combo box is in a subform but I don't think that matters. Here is my sample code but its not working right.

Dim strProd25 As String



strProd25 = "Orange"

If Me.ProductID.ItemData = ("Orange") Then
Me.Parent!MechanicalSpreader.Value = True 'This is a check box
Else
MsgBox "Mechanical Spreader Method must be check"
Me.ProductID.Undo
Me.Undo
End If

Thanks

[ajetrumpet]

how do you script WHAT?

[Ferdi]

What I want to do is if I select "orange" in a combo box drop down then I want a check box to be checked.

[ajetrumpet]

What I want to do is if I select "orange" in a combo box drop down then I want a check box to be checked.

you have to check for the value:

after_update

if me.combo = "orange" then
   me.checkbox = -1
end if

[Ferdi]

Thanks I was wondering can you put this On-Click rather than after update. Is there a difference?

[ajetrumpet]

Thanks I was wondering can you put this On-Click rather than after update. Is there a difference?

why? clicking a combo doesn't change the value. what's the point of that?

[Ferdi]

So what you r saying is that there is no difference where you put the code. If that is the case then thanks.