Question

我目前正在开展一个项目，我必须为Sweet Company /批发商创建一个原型系统。在我的客户订单明细表上，我有一个组合框，可以选择订购的库存商品是“已分配”还是“已发货”。我想拥有它，以便一旦选择'Shipped'，它就无法更改回来。我尝试在VBA中编码，这样一旦选中，组合框就会变为enabled = false。但问题是它是否会改变系统中的每个客户订单。我的代码如下所示：

Private Sub OrderStatus_Click()
    If OrderStatus = "Shipped" Then
        OrderStatus.Enabled = False
    End If

    ' etc
End Sub

无论如何都要引用属性“订单状态”（即发货或已分配）的单个实例而不影响每个客户订单？请帮忙！

Answer 1

您可以为On_Current（）的表单添加一个事件，这样无论何时切换到新记录，它都会检查是否应该为该记录启用组合框。

Private Sub On_Current()
    If OrderStatus = "Shipped" Then
        OrderStatus.Enabled = False
    else
        OrderStatus.Enabled = True
    End If
end Sub

Access 2010 VBA引用表中的单个字段

1 个答案: