VBA在MS Access中启用文本和组合框

时间:2018-03-21 11:58:48

标签: ms-access access-vba

当另一个组合框(Combo26)取值“已解决”时,我想创建一个文本框(以下为Text28)和一个组合框(此后为combo43)

所以这是用VBA编写的代码,应该这样做:

    Private Sub Combo26_AfterUpdate()

If Combo26.Value = "Resolved" Then
    Me.Text28.Enabled = True
    Me.Combo43.Enabled = True
Else
    Me.Text28.Enabled = False
    Me.Combo43.Enabled = False

End If

End Sub

不幸的是,当我尝试它时没有任何反应。你有什么想法吗? 谢谢

1 个答案:

答案 0 :(得分:1)

如果您将两列作为行源(如上面的注释中所示),则看起来第一个显示的是ID。您应该定位第二列进行比较,例如,

If Combo26.Column(1) = "Resolved" Then
  ...

这对我有用!

Combo26.Column(0)

会给你ID。