davidbodhi
Davidbodhi
- Local time
- Today, 08:45
- Joined
- Jul 6, 2005
- Messages
- 79
I have a combo box set up to select a product and put the price into a text box. I am getting the cost showing up in the text box Therapy_Cost just fine, but the combo box itself does not display anything after I select something. If I remove the AfterUpdate, I do get the item displaying in the combo box, but, of course, don't get the price in the text box. Here are the details. Can anyone help?
Combo Box
Name:
Therapy_Type
Control Source:
Therapy_Cost
Row Source:
SELECT Purchase_Items.ItemID, Purchase_Items.Item_Name, Purchase_Items.Item_Cost
FROM Purchase_Items
WHERE (((Purchase_Items.Item_Type)="2"));
Number of Columns:
4 (In this order - ID, Type, Name, Cost)
Bound Column:
1
Column Widths:
0";0";1";0"
AfterUpdate:
Private Sub Therapy_Type_AfterUpdate()
Me!Therapy_Cost = Me!Therapy_Type.Column(3)
End Sub
Combo Box
Name:
Therapy_Type
Control Source:
Therapy_Cost
Row Source:
SELECT Purchase_Items.ItemID, Purchase_Items.Item_Name, Purchase_Items.Item_Cost
FROM Purchase_Items
WHERE (((Purchase_Items.Item_Type)="2"));
Number of Columns:
4 (In this order - ID, Type, Name, Cost)
Bound Column:
1
Column Widths:
0";0";1";0"
AfterUpdate:
Private Sub Therapy_Type_AfterUpdate()
Me!Therapy_Cost = Me!Therapy_Type.Column(3)
End Sub