vb的combobox控件取值问题

Question

请问各位高手，vb的combobox控件中是否能显示为某个值，点击选中后取值为另一个值，如combobox中显示“北京、上海、天津”，点击北京，combobox取值为“010”
或者vb有类似的控件谢谢!

Answer 1

可以用双combobox，另一个设为不可见，两个对应

Answer 2

也可以
添加Combo1.AddItem "北京" & Space(50) & "010"
取值只取right(Combo1.text,3)

Answer 3

combobox 还有个ItemData值可以利用。
for i=0 to 10
   combobox.additem "值" & i
   combobox.itemdata(i)=i
next

Answer 4

Option ExplicitPrivate Sub Combo1_Click()
    Select Case Combo1.Text
        Case "北京"
            Combo1.Tag = "010"
        Case "上海"
            Combo1.Tag = "020"
        Case "天津"
            Combo1.Tag = "030"
    End Select
    Label1.Caption = Combo1.Tag
End SubPrivate Sub Form_Load()
    Combo1.AddItem "北京"
    Combo1.AddItem "上海"
    Combo1.AddItem "天津"
    Combo1.ListIndex = 0
End Sub

Answer 5

VB 的 ComboBox 没有多列的。
5楼的方法可行，不过可以直接用 ListIndex 属性，没必要用 Text 进行字符串比较。

Answer 6

我是想省、市、县联动，做三个combobox,都从数据库中取数

Answer 7

直接click是open数据库也行！
Private Sub Combo1_Click()
    dim d as new ado....
    d.open "select FBh from Tablename where fname='"& combo1.text &"'",conn
....
End Sub

Answer 8

如果取自数据库可以改用 Microsoft Data Bound List Controls 6.0 (SP6) 中的 DBCombo 控件。