Question

我在Microsoft Access中创建了一个患者数据输入表单。它收集的一个字段是医疗记录号。每位患者只有一个MR＃，无论他们多少次访问办公室。我已经做了一个单独的查询，查看MR＃输入的次数，以及患者去看医生的频率。我想创建一个警报，以便如果MR＃的出现超过3，它会提醒医生。

但是，我无法在网上找到任何有关如何编码此警告的信息。任何提示或编码示例都会非常有用。

Answer 1

假设您的医疗记录号位于名为txtMedicalRecordNumber的文本框中。

如果您想让医生输入值并仅显示警告，请将此类代码放在文本框的After_Update事件后面

If Nz(DCount("MedicalRecordNumber", "MyTable", "MedicalRecordNumber = '" &  me.txtMedicalRecordNumber & "'"), 0) > 3 Then
    MsgBox "This record has been entered more than three times"
End If

您还可以将dCount的结果分配给变量，并在消息框中提供条目数。

如果您想阻止他们多次输入医疗记录三次，请使用Before_Update事件并取消更新。

If Nz(DCount("MedicalRecordNumber", "MyTable", "MedicalRecordNumber = '" &  me.txtMedicalRecordNumber & "'"), 0) > 3 Then
    MsgBox "This record has been entered more than three times"
    cancel = true
End If

在Microsoft Access中创建警告

1 个答案: