表单输入验证，仅允许存在另一个表中的值-Acess

Question

我正在尝试在Access（2016）中创建一个数据输入表单，并希望仅允许值已经存在于产品数据库中。

我想要的最终结果将类似于以下内容：

用户输入：B8631 我希望Access可以对Item_Master.Primal_Code的输入值进行查找，并仅允许将其作为值（如果已经存在），否则将其拒绝。

Answer 1

您可以使用Dcount函数来验证输入。见下文

Dim userInput as string
userInput = "B8631" 

If Dcount("*","Item_Master","Primal_Code='" & userInput & "'")<=0 Then
    msgbox "not found"
    exit sub        
end if