Changing combo box search field by using option buttons (1 Viewer)

[Mansfield]

Can somebody please tell me if they know how to change the search field of a combo box by using optoin buttons. For example: To enable a search combo box to search by project number and by project name

 

[S]

Having option1 as Optiongroup and CC as ComboBox:
select case option1
Case 1
CC.RowSource = "TableName1"
CC.ColumnCount = 2 'Number of columns allowed
CC.BoundColumn = 1 'Column linked
CC.Requery
Case 2
CC.RowSource = "TableName2"
CC.ColumnCount = 2 'Number of columns allowed
CC.BoundColumn = 1 'Column linked
CC.Requery
end select