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

【问题标题】：VBA enabling text and combo box in MS Access在 MS Access 中启用 VBA 文本和组合框
【发布时间】：2018-03-22 02:31:35
【问题描述】：

当另一个组合框 (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

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

【问题讨论】：

请发布 Combo26 的行源
@DataWriter SELECT [StatusList].[ID], [StatusList].[Status] FROM StatusList;
How to debug VBA code -- 在 sub 中放置一个断点并检查 Combo26.Value - 这将是一个 ID，而不是您期望的字符串。
@Andre 如何检查 Combo26.Value 或 Combo26.Column(0)？谢谢
与Debug.Print.

标签： ms-access vba

【解决方案1】：

如果您将两列作为行源（如您在上面的评论中所示），则显示的第一列似乎是 ID。您应该针对第二列进行比较，例如，

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

这对我有用！

Combo26.Column(0)

会给你ID。

【讨论】：