使用 vba 防止特定值在 MS 访问中重复

【问题标题】：prevent a specific value from being duplicated in MS access using vba使用 vba 防止特定值在 MS 访问中重复
【发布时间】：2016-09-26 05:20:43
【问题描述】：

在我的表单中有一个“位置”组合框，它绑定到 table1 中的“位置”字段。为简单起见，假设每个人将获得“员工”职位，只有一个人将获得“经理”职位，如果我将“经理”标题分配给另一个人，我想收到一条警告消息（在 VBA 中）人并阻止该过程，除非我从第一人中删除该职位。我用谷歌搜索，我发现我必须使用“DLOOKUP”功能，尝试过但仍然没有运气。任何帮助将不胜感激，谢谢

【问题讨论】：

标签： vba ms-access duplicates

【解决方案1】：

尝试在表单的 Combobox 上创建一个“AfterUpdate”事件并将此代码放入其中：

    If Nz(DLookup("Person", "Table1", "Position = 'MANAGER'", "NOTFOUND") <> "NOTFOUND") Then

      MsgBox ("Someone is already assigned to role MANAGER")

    Else

    'OK, no manager currently exists

    End If

我假设“Person”是“Table1”中包含人员姓名的字段。

希望这会有所帮助。

【讨论】：

括号有问题，已修复，现在您的代码可以正常工作了，谢谢 Davy C
啊抱歉，我糊涂了复制代码。现在应该修复了。