怎样将COMBOBOX控件中得值分开获取？

Question

我有一个COMBOBOX控件，显示的是一个表中两个字段的内容Combobox.AddItem table.Fields("dm") & table.Fields("mc"),我怎样将这个COMBOBOX控件中选取的内容分开提取，比如用户选择了Combobox的值aaa 二班，我想将aaa和二班分开传递给下一个页面，如何实现？

Answer 1

用Combobox.AddItem table.Fields("dm")&"|"& table.Fields("mc")连接，然后下一个页面调用的时候用split(传递的值,"|")分割

Answer 2

Combobox.AddItem table.Fields("dm") & " " & table.Fields("mc")
以空格分

Answer 3

Combobox.AddItem table.Fields("dm") & vbtab & table.Fields("mc")用制表符隔开。楼下还有其他好点的间隔字符么？

Answer 4

用 Microsoft   Form   2.0   Object   Library 里的Combobox
装了Office2000后才有
Private Sub Command1_Click()
  MsgBox ComboBox1.Text '返回 字母
  MsgBox ComboBox1.Value '返回数字
End SubPrivate Sub Form_Load()    Me.ComboBox1.ColumnCount = 2                  '设置显示列数
    ComboBox1.Font.Size = 10                               '设置字体大小
    ComboBox1.BoundColumn = 0
    ComboBox1.TextColumn = 1
    ComboBox1.BorderStyle = fmBorderStyleSingle            '显示样式    ComboBox1.AddItem "A"
    ComboBox1.AddItem "B"
    ComboBox1.AddItem "C"
    ComboBox1.AddItem "D"
    ComboBox1.Column(1, 0) = 1
    ComboBox1.Column(1, 1) = 2
    ComboBox1.Column(1, 2) = 3
    ComboBox1.Column(1, 3) = 4
End Sub