自动填充组合框

Question

我又来了。 我的表单上有 3 个组合框，即 cmbPart_number、cmbPart_name 和 cmbEOnumber。

我想知道的是，当用户从 cmbPart_number 中进行选择时，如何自动填充 cmbPart_name 和 cmbEO_number 框。 到目前为止，我所尝试的是在行源 SQL 查询中添加part_name和EO_number，并在 cmbpart_name 的控制源中添加 cmbpart_name(value)=cmbpart_number.column(1)

对此的任何帮助都非常感谢

Answer 1

您应该能够通过在 AfterUpdate 事件中设置 RowSource 来完成此操作

Private Sub cmbPart_number_AfterUpdate()

   cmbPart_name.RowSource = "...WHERE [PartNumber] = '" & _
                                                   cmbPart_number.value & "'; "
   cmbPart_name.Requery

End Sub

以下是 在Access中实现级联组合框

Answer 2

我知道必须有一种简单的方法可以做到这一点，而无需深入研究 VB。 我的第一个组合框即 cmbPart_number，我已修改如下 - Row Source 在 SQL 查询中具有所有 3 个字段，即 SELECT part_number、part_name、EO_number from parts ORDER BY...；
我已将列计数修改为 2，因为 Access 始终将表中的第一列计数为数字 0。 所有 3 个字段均为 2。 我的列宽是 1";0"

接下来，我将 cmbPart_name 的控制源修改为 =cmbpart_number.column(1)。 它的行源有一个 SELECT 语句 SELECT part_number, part_name FROM parts, ORDER BY...
列数为 1，列宽为 0";1"

最后对于 cmbEO_number，控制源为 =cmbpart_number.column(2)。 行源选择语句为 SELECT part_number, EO_number FROM parts ORDER BY...列数为 1，列宽为 0";1"

现在，这可以正常工作，并且 cmbPart_number 框中选择的任何条目都会自动填充其他 2 个条目。
感谢大家的帮助。