文本框控制组合框,除非用户重新键入,否则文本框中的默认值不会控制它

时间:2015-08-28 14:05:19

标签: ms-access access-vba ms-access-2010

所以每天我从SAP导入一些数据。这带来了6个领域。其中一个字段填充表单上的文本框(txtStore)。表单下方的组合框将商店编号与存储在单独表中使用的供应商进行比较。

麻烦就是这个。

导入会填充商店编号。让我们称之为“3”。商店3对应于供应商“e”,“f”和“g”。但是当用户打开表单时,它将供应商列为“a”,“b”和“c”,它们对应于供应商表中的第一条记录。如果用户删除并重新输入“3”,则会出现正确的供应商。

如何在自动打开表单时显示正确的供应商?

组合代码如下:

Private Sub txtStore_AfterUpdate()
    cboIP.RowSource = "Select IP from Vendors where (Store=" \& [Forms]![Project Details]![txtStore] & ")"
    cboIP.Requery
End Sub

1 个答案:

答案 0 :(得分:0)

我会将这种代码放入其中一个表单事件中。

例如,OnLoad事件(假设txtStore在打开时也会被填充)。