【问题标题】:Cascading Combo Boxes - Dependent Box is Blank级联组合框 - 相关框为空白
【发布时间】:2019-08-22 23:50:12
【问题描述】:

我有一个名为 POHeader 的表格,其中显示了供应商的采购订单编号和供应商编号,以及每个采购订单的其他数据点。

有时,我们将特定采购订单从我们的所有交付规则中豁免,我创建了一个访问表单来存储这些豁免。现在,表单上有两个组合框,一个用于 PO 编号,一个用于供应商编号。我希望供应商编号组合框仅筛选出与用户选择的采购订单编号匹配的供应商(采购订单编号在某些情况下可能不是唯一的)。

这是我为 PO Number 组合框上的 AfterUpdate 事件编写的 VBA:

Private Sub PONumber_AfterUpdate()
    Me.VendorNumber.RowSource = "SELECT tblPOHeader.VendorNumber " & _
                           "FROM tblPOHeader " & _
                           "WHERE tblPOHeader.PONumber = '" & Me.PONumber & "' " & _
                           "ORDER BY tblPOHeader.VendorNumber"

End Sub

我的问题是,一旦选择了采购订单编号,供应商编号组合框就会变为空白。我做错了什么?

Private Sub PONumber_AfterUpdate()
    Me.VendorNumber.RowSource = "SELECT tblPOHeader.VendorNumber " & _
                           "FROM tblPOHeader " & _
                           "WHERE tblPOHeader.PONumber = '" & Me.PONumber & "' " & _
                           "ORDER BY tblPOHeader.VendorNumber"

End Sub

【问题讨论】:

  • tblPOHeader.PONumber 真的定义为字符串吗?如果它被定义为数字,请尝试不带单引号:"WHERE tblPOHeader.PONumber = " & Me.PONumber & " " & _
  • 嗨!是的,PONumber 是一个字符串。谢谢,不过

标签: vba ms-access


【解决方案1】:

我解决了! 我没有使用 AfterUpdate 的 VBA,而是将供应商编号字段的行源更新为: enter image description here

然后重新查询 AfterUpdate。

【讨论】:

    猜你喜欢
    • 1970-01-01
    • 2021-12-05
    • 1970-01-01
    • 1970-01-01
    • 1970-01-01
    • 1970-01-01
    相关资源
    最近更新 更多