I would like to take a text box, which is bound to a table, when the value is entered, it automatically prompts another textbox, based on the entered value to produce a specific value for it. Ex.

I enter "Apples" in textbox 1
then based on Apples in textbox two it automatically makes "Red" show up or
I enter "oranges" in textbox 1 and in text box two "Orange" shows up?

Any Help

Tb1 is the control where the user inputs a value, Tb2 the other one.
In the after update event of Tb1:

Dim CtlTb1 as Control
Dim CtlTb2 as Control
Set CtlTb1 = Me.Tb1
Set CtlTb2 = Me.Tb2

Select Case CtlTb1

Case "Apple"
Ctbl2 = "Red"

Case "Orange"
Ctbl2 = "Orange"

Set CtlTb1 = Nothing
Set CtlTb2 = Nothing

End Select

Alex

[This message has been edited by Alexandre (edited 09-17-2001).]

I did it a tad different I used the ElseIF in the code builder and it works great on the on click event. Thank you