Warning: file_get_contents(/data/phpspider/zhask/data//catemap/9/apache-flex/4.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Access 2010 VBA引用表中的单个字段_Vba_Ms Access 2010 - Fatal编程技术网

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

Access 2010 VBA引用表中的单个字段,vba,ms-access-2010,Vba,Ms Access 2010,我目前正在从事一个项目,我必须为一家糖果公司/批发商创建一个原型系统。在我的客户订单详细信息表单上,我有一个组合框来选择订购的库存项目是“已分配”还是“已发货”。我想拥有它,这样一旦选择了“Shipped”,它就不能被更改回来。我尝试用VBA进行编码,这样一旦选中,组合框就会变为enabled=false。但是,问题是系统中的每个客户订单都会发生变化。 我的代码如下所示: Private Sub OrderStatus_Click() If OrderStatus = "Shipped"

我目前正在从事一个项目,我必须为一家糖果公司/批发商创建一个原型系统。在我的客户订单详细信息表单上,我有一个组合框来选择订购的库存项目是“已分配”还是“已发货”。我想拥有它,这样一旦选择了“Shipped”,它就不能被更改回来。我尝试用VBA进行编码,这样一旦选中,组合框就会变为enabled=false。但是,问题是系统中的每个客户订单都会发生变化。 我的代码如下所示:

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

    ' etc
End Sub

在不影响每个客户订单的情况下,是否可以引用属性“订单状态”(即已发货或已分配)的单个实例?请帮忙

您可以在表单中为On_Current()添加一个事件,这样每当您切换到新记录时,它都会检查是否应该为该记录启用组合框

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

表单是否绑定到记录集,或者您是否正在执行代码以在某处更新记录?如果是,请包括该代码。