检查Access

时间:2017-03-17 06:53:33

标签: vba textbox access

我如何知道访问中的密码文本框字段是否为空或其上没有任何值?

Private Sub cmdLogin_Click()

If IsNull(Me.txtPassword.Value) Or Trim(Me.txtUserName & "") = vbNullString Then
    MsgBox "Username or Password must not be empty.", vbCritical, "Error!"
Else
    MsgBox "welcome"
End If

End Sub

代码是我尝试过的,即使我尝试使用Len(Me.txtPassword & "") = 0,它仍会执行if语句。我担心的是,如果文本框字段的输入掩码是密码,它应该接受空格(通过按空格键)作为文本或字符串的一部分。有什么方法可以解决这个问题吗?

1 个答案:

答案 0 :(得分:0)

您明确不允许在原始if语句中使用空格作为密码。这应该起作用:

Private Sub cmdLogin_Click()

    If IsNull(Me.txtPassword.Value) Then
        MsgBox "Username or Password must not be empty.", vbCritical, "Error!"
    Else
        MsgBox "welcome"
    End If

End Sub

我认为这无关紧要。密码与数据库中存储的密码匹配肯定是重要的吗?就个人而言,我将表中的密码字段设置为Required = True和AllowZeroLength = False。

在MS Access中,很难将字段值更新为以“”结尾的内容。在表和表单上的数据表视图中,更新文本字段时,该值将自动修剪。真烦人。