VBA select 组合框中的值使用 ColumnBound

VBA select value in combobox using ColumnBound

我在用户窗体中有一个组合框,其填充如下:

从数据库查询:

select name, id from employees

结果存储在二维数组V:

aaa    231
bbb    244
ccc    301

并且初始化工作完美如下:

ComboBox1.list = V

BoundColumn 属性 设置为 2(ID)。 当用户选择一个值时,他会看到名称和值 returns ID,这是应该的。

但是当我尝试使用

设置值时
 ComboBox1.value = 244

我收到以下错误:

很有意思。做了一些测试后,我发现只有第一列可以作为组合框的值导入。

它的值的赋值应该用文本来完成,而不是值。这是因为该值成为绑定列的值。所以,如果要赋值id,就得在查询语句中按照id和name的顺序导入赋值。

id,name
boundcolumn=1

ComboBox1.text = 244