Question

当我选择以（REF）开头的许多组合框值中的一个时，我试图勾选表单上的复选框 - 这是代表引用闭包的代码。

这就是我所做的......这不起作用

Private Sub ReasonForInappriopriateReferral_AfterUpdate()
    If Me.RsnForInappropriateRef.Value Like "(REF)*" Then
        Me.Check66 = True
    End If
End Sub

请帮助，我之前尝试将标签条件格式化为不同的颜色，如果关闭原因是引用关闭，但也不能这样做，并认为它可以归结为IF Like命令。

Answer 1

我完全按照您的指示添加了两个控件。我通过将行源类型设置为值列表来填充我的组合，并将行源设置为“Blah Blah”;“（REF） - 杰克逊”;“两次”;“（REF） - 泰森”

我把它放在按钮的Click事件中：

If Me.RsnForInappropriateRef.Value Like "(REF)*" Then
    Me.Check66 = True
Else
    Me.Check66 = False
End If

它的表现完全符合预期。然后我将它移动到组合框的AfterUpdate事件，并再次完美地工作。我唯一能看到的是，在您的示例中，组合框与您的子组件名称不同（ReasonForInappriopriateReferral vs RsnForInappropriateRef）。你确定你的名字是对的吗？

ACCESS：如果从组合框中选择以“（REF）”开头的值，则表单上的Ticking复选框

1 个答案: