Ms access Ms Access-如果复选框=true，则（编译错误）

当我尝试此代码时发生编译错误。如果复选框为true，则允许按下按钮

Option Compare Database

Function CheckMyButton()
Me.Command414.Enabled = (Me.chk1 And Me.chk2 And Me.check4 And Me.chk3)
End Function

Private Sub chk1_AfterUpdate()
=CheckMyButton()
End Function

Private Sub chk2_AfterUpdate()
=CheckMyButton()
End Sub

Private Sub check4_AfterUpdate()
=CheckMyButton()
End Sub

Private Sub chk3_AfterUpdate()
=CheckMyButton()
End Sub

=CheckMyButton（）

不进入事件过程的主体（在那里您将使用

调用CheckMyButton（）

）

=CheckMyButton（）

直接进入表单属性窗口中的

AfterUpdate

属性

关键是不要让多个事件过程都做同一件事

德国访问：

---

Ah它可以工作，但当添加新记录时，它仍然允许我按下按钮。仅当我勾选一个文本框/取消勾选一个文本框时，按钮才会不可点击。如何添加一个可编辑的文本框，显示我的Nz（Dlookup）Nz（Dlookup（“密码”、“员工”、“用户名=””和临时变量（“员工类型2”）&“”）这是一个计算字段，永远不可编辑。啊，我明白了，我正在寻找一个编辑用户表单（其中存储了tempVar用户名和密码），我不知道我该怎么做