ComboBox控件问题，有点烦啊!

Question

从字典数据库里读出数据，下拉显示字段是Name字段，而判断ComboBox的Change或Click的时候，我不想用名称Name字段来检查，而用字段ID来检查，怎么加隐藏ID列?？？或者还有别的控件能否代替？？？
If Not Rst.EOF Then
    i=-1
    Do While Not Rst.EOF 
        i=i+1     
        ComboBox1.AddItem Rst!Name,i
        Rst.MoveNext
    Loop
End If
Rst.Close

Answer 1

Do While Not Rst.EOF 
        i=i+1     
        ComboBox1.AddItem Rst!Name,i
        List1.ItemData(List1.NewIndex) = Rst!ID'添加你的ID
        Rst.MoveNext
    LoopPrivate Sub List1_Click()
MsgBox List1.ItemData(List1.ListIndex)'这样就得到ID了
End Sub

Answer 2

用ComboBox1替换掉我的List1就行了

Answer 3

添加另一个ComboBox2，设置Visible=false。
If Not Rst.EOF Then
    i=-1
    Do While Not Rst.EOF 
        i=i+1     
        ComboBox1.AddItem Rst!Name,i
        ComboBox2.AddItem Rst!ID,i
        Rst.MoveNext
    Loop
End If
Rst.Close然后

Answer 4

呵呵!tztz520(午夜逛街)超级快!抢不过你!