Ms-Access-如果IF复选框= true然后

时间:2018-07-26 09:26:59

标签: vba ms-access access-vba

我该如何做,以便当全部选中4个复选框时(true),然后可以按下该按钮来保存记录。

四个复选框s被称为“ chk1,chk2,chk3,chk4” 按钮称为“按钮”

我假设它会遵循“如果Chk1,chk2,chk3,ck4 = True,那么Button =可见?”

然后如果复选框不正确,则无法按下按钮

1 个答案:

答案 0 :(得分:3)

您创建一个检查复选框并相应设置按钮状态的函数...

Function CheckMyButton()
    Me.MyButton.Enabled = (Me.chk1 And Me.chk2 And Me.chk3 And Me.chk4)
    ' If you want to be more verbose, do
    ' (Me.chk1.Value=True And Me.chk2.Value=True And ...
End Function

...,然后从所有复选框的After Update事件中调用此函数。
编辑,如果是绑定表格,也可能会发生在Form_Current事件中。

您可以直接使用

=CheckMyButton()

在事件属性中,不需要4个事件过程。