主题：[求助]在combobox中用代码时间数据字典输入

示例一

Dim cmb As WinForm.ComboBox
cmb = Forms("窗口1").Controls("ComboBox1")
cmb.ComboList = "计算机|打印机|传真机|电话机"

加问一条，如果我想用代码直接在combobox里实现以下的功能，而不是从数据表里调用，该怎么实现？

刘德华 | 香港

五月天 | 台湾

范冰冰 | 大陆

我希望出现供选的有上述两列内容，但实际赋予combobox的值为”刘德华“， ”刘德华 | 香港“只作为下拉清单时的显示项。