MS access 2010 VBA 连接表与组合框和标签

【问题标题】：MS access 2010 VBA connect table with combobox and labelMS access 2010 VBA 连接表与组合框和标签
【发布时间】：2012-06-07 21:12:55
【问题描述】：

我有一个包含 SUPP_CODE 和 SUPP_NAME 列的表。我在表单中放置了一个组合框，并将属性记录集设置为 SUPP_NAME。

现在，我在表单中有一个标签，我想做以下事情：

- When user selects a SUPP_NAME in the combo box, the label will view the corresponding SUPP_CODE.

我没有将 ID（自动编号）放入该表，但如果需要，我可以放入。

我需要有关如何执行此操作的提示、技巧和代码。请帮忙。

【问题讨论】：

【解决方案1】：

可能最简单的方法是像这样设置组合框：

Row Source : Select Supp_Code, Supp_Name FROM table
Column Count : 2
Column Widths : 0cm;2cm
Bound Column : 1 ''Counting from 1

通过此设置，您可以将文本框设置为：

=MyCombo.Column(0) ''Supp_Code, counting from 0

但是，由于Bound Column是1（Supp_Code），combo的值也是1列，所以你可以简单地说：

=MyCombo

之后，您可以使用 DLookUp、DCount 和 DSum 等域函数从表单中未包含的表中获取数据。

【讨论】：