求助Combox问题！

Question

小弟我现在做了2个Combox，分别用来列出某件事物的“编号(Number)”和“名称(Name)”，其中Number不能相同，Name可以相同
想达到的效果：能按Number选Name，也要能按Name选Number！我从数据库中取了Number和Name2个字段，其中按Number选Name实现了，但是当实现按Name选Number时，问题就出来了：由于Name可以相同，因此，在选择Name的时候，Number有很多个，总是不停地把此Name的所有Number列出来跳动，最后就报错。请问高手这个问题如何解决？？？初入此行，着急啊！期待高人指点！！！

Answer 1

Private Sub Form_Load()
    Dim sName As String
    Dim nNumber As Long    Combo1.AddItem nNumber    Combo2.AddItem sName
    Combo2.ItemData(Combo1.NewIndex) = nNumber
End Sub这样就一一对应了用Combo2.ItemData和Combo1.List比较

Answer 2

补充一下：
如果Number不是数字
用Combo2.ItemData和Combo1.ItemData比较
总之一一对应就可以了