Question

我想知道是否有人能告诉我如何检查表单中的多个字段是否有效。基本上我想为我的最后一个字段设置一个验证规则，以检查所有以前的字段是否为空。

我已经尝试过这个：

IsNull([FieldName])

我知道这只适用于一个领域，但我甚至无法实现这一目标。我是一个非常新的访问权限，所以任何帮助将非常感激。谢谢！

Answer 1

我要做的是在你要验证的每个控件的tag属性中，在那里放一个你可以检查的单词（例如 - 为你想要检查的每个控件输入“VALIDATE”）。要查找标记属性：查看每个控件的属性表，在OTHER选项卡中，列出最后一个字段= tag）。

然后作为最后一个控件的afterupdate事件中的代码，选择EVENT PROCEDURE并输入以下代码：

Dim ctl As Control

For Each ctl In Forms!YourFormName
If ctl.Tag = "validate" Then
    If IsNull(ctl.Value) Then
        ctl.SetFocus
        MsgBox "You must complete the " & ctl.Name & " field.", vbOKOnly, "Required Field Missing"
        GoTo exitsub
    End If 
End If
Next

exitsub:
Exit Sub

如果找到并清空字段，它将返回到该字段，（设置焦点）并显示一个消息框，指出它们必须输入值。

MS Access表验证

1 个答案: