Forms ms access链接每个复选框（真/假列）以在窗体中运行单个代码

新版2017年6月2日

---

我正在为我工厂的设备创建一个预防性维护计划数据库。我们有大约70台不同的机器，上面有个人的预防性维护说明，我已经能够通过使用更新数据库的表单为机器创建带有附加说明的表。我创建了一个主窗体，该窗体将根据搜索的日期过滤需要执行的PM，该窗体将通过数据库中的机器进行过滤，access可以做到这一点。我目前遇到的问题是找到一种方法将复选框添加到此主窗体，并仅打印通过按钮选中的复选框。我们的计划是让机械师能够打印PM指令，并使用打印更新数据库。有没有一种方法可以通过复选框或选项框来实现这一点？

您的问题有点模糊，无法提供您可能尝试过的内容的任何见解（这实际上可以帮助我们确定您想要做什么）。也就是说，根据给出的结果：

如果您只有一个复选框，并且希望在选中/取消选中时执行某些操作

Private Sub CheckboxName_Click()
   If CheckboxName.Value = -1 Then
      'Do something
   Else
      'Do something else (Else is optional)
   End If
End Sub

如果您有多个复选框，希望确认在按下按钮或某物时哪些复选框已选中，哪些未选中，则可以使用Controls对象在所有复选框之间循环

Private Sub ButtonName_Click()
   Dim ctrl as Control
   Dim i as Integer

   For Each ctrl In Me.Controls
      If ctrl.ControlType = acCheckBox and ctrl.Value = -1
          'Do something (e.g., Select Case ctrl.name)
      End If
End Sub

---

希望这至少为您指明了正确的方向。

请通读一些文档，了解这里可以问哪些类型的问题。这不是一个好问题。好的，你能看看我问题的编辑版本，看看这是否更清楚理解。