Dim A as Variant
Dim B as Variant
Dim C as Variant
A = Me![ComboBoxName].Column(0)
B = Me![ComboBoxName].Column(1)
C = Me![ComboBoxName].Column(2)
Put this in the After Update event and then A, B and C will hold the values in the three fields in the combo box. If you have fields on the form to display the selections then this will work instead of the above code:
Me![FieldName1] = Me![ComboBoxName].Column(0)
Me![FieldName2] = Me![ComboBoxName].Column(1)
Me![FieldName2] = Me![ComboBoxName].Column(2)
HTH,
Jack