如何从组合框及其填充在表单上的字段返回值以将值插入新表

Question

我可以将值放入组合框中，但无法将该值插入到另一个表中。两个简单表之间存在 PK -> FK 关系。

我想做的就是将 1 个值返回到组合框中，即 table1 中的主键，然后将组合框中主键的值插入到 table2 中的外键字段中。我希望能够使用 VBA 执行此操作，以便将来能够对组合框中数组中的其他值执行相同的操作。

Answer 1

这是对问题的回答。一些变量的名称已更改。

该解决方案跳过了一些步骤，但通过完整的解决方案解决了我的问题：

私有子cboVanNumber_AfterUpdate()

将 ComboID 设为整数 Dim strSQL 作为字符串 将 DriverID 调暗为整数

DriverID = Forms!frmRoute!txtDriverID ComboID = Forms!frmRoute!cboVanNumber.Column(1)

strSQL =“更新tblVan SET tblVan.FK_ID_Driver =”＆DriverID＆“”＆vbCrLf＆_ “WHERE (((tblVan.VanNumber)=” & ComboID &”));”

DoCmd.RunSQL strSQL

结束子

该解决方案使用文本框中的值 DriverID，它是 tblVan 中的外键。从与外键相关的组合框中选择 VanNumber 后，外键将在表中更新。基本上，我颠倒了更新文本框的顺序，而不是使用组合框。另外，VanNumber 不是主键，但它与主键唯一相关。

谢谢大家的意见！