尝试根据访问2010中的组合框选择获取属性集

时间:2014-01-31 19:17:37

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

我以为我已经想通了,但我正在尝试根据两个组合框选择设置我的表单中的字段的值。我测试的前几个确定没问题,但是当我添加更多时,我停止了结果。

到目前为止的代码片段:

If (Product_Select = "Krystar 20kg") Then
    If (Batch_Number_Select = "Batch 1") Then
        DoCmd.SetProperty "Text5", , "60"
    ElseIf (Batch_Number_Select = "Batch 2") Then
        DoCmd.SetProperty "Text5", , "61"
    ElseIf (Batch_Number_Select = "Batch 3") Then
        DoCmd.SetProperty "Text5", , "62"
    ElseIf (Batch_Number_Select = "Batch 4") Then
        DoCmd.SetProperty "Text5", , "63"
    ElseIf (Batch_Number_Select = "Batch 5") Then
        DoCmd.SetProperty "Text5", , "64"
    End If
End If

有人看错了吗?语法对我来说很好看。

1 个答案:

答案 0 :(得分:1)

我不使用DoCmd.SetProperty,所以我不得不查一查。第二个参数的默认值为acPropertyEnabled,而您希望将其设置为acPropertyValue。是否有Me.Text5 = "60"不适合您的原因?