怎样将COMBOBOX控件中得值分开获取?
我有一个COMBOBOX控件,显示的是一个表中两个字段的内容Combobox.AddItem table.Fields("dm") & table.Fields("mc"),我怎样将这个COMBOBOX控件中选取的内容分开提取,比如用户选择了Combobox的值aaa 二班,我想将aaa和二班分开传递给下一个页面,如何实现? 用Combobox.AddItem table.Fields("dm")&"|"& table.Fields("mc")连接,然后下一个页面调用的时候用split(传递的值,"|")分割 Combobox.AddItem table.Fields("dm") & " " & table.Fields("mc")以空格分 Combobox.AddItem table.Fields("dm") & vbtab & table.Fields("mc")用制表符隔开。楼下还有其他好点的间隔字符么?
用 Microsoft Form 2.0 Object Library 里的Combobox
装了Office2000后才有
Private Sub Command1_Click()
MsgBox ComboBox1.Text '返回 字母
MsgBox ComboBox1.Value '返回数字
End Sub
Private 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
补充:VB , 基础类