vb中的combobox怎么实现显示的值和返回的值不一样？

[guo1wu3shi4]

vb中的combobox怎么实现显示的值和返回的值不一样？
如显示的是名称，返回的是编号

[qiqunet]

程序是你开发的，ComboBox的属性很多，看你怎么用吧~

如
取得显示的值用Combo1.Text
取得返回的值可用Combo1.ListIndex

Private Sub Form_Click()
Me.Cls
a = Split("01001,01002,01003,01004,01005", ",")
Combo1.ListIndex = Combo1.ListIndex + 1
Print Combo1.Text
Print Combo1.ListIndex
Print a(Combo1.ListIndex)
End Sub

[rose12]

qiqunet(瑞旗·广东) 说得是对的。可能是属性设置的问题

[leolan]

'利用數組返回ComboBox的值:

Option Explicit
Private marray() As String

Private Sub Combo1_Click()
MsgBox marray(0, Combo1.ListIndex)
End Sub

Private Sub Form_Load()
Dim i As Integer

For i = 0 To 9
Combo1.AddItem "item" & i
ReDim Preserve marray(1, i)
marray(0, i) = CStr(i)
marray(1, i) = Combo1.List(i)
Next

End Sub

[ryuginka]

up

[azyue]

你是怎么来取的值的啊：
显示的值一般是这样 combol.text
你可以选择combol.listindex="要选的位置" like=1 is selected the second

[cq20081127]

可以用select语句与combobox的listindex相结合用呀