这个密码验证码怎么没有用?

时间:2012-03-14 10:35:36

标签: vba ms-access access-vba

我需要在Microsoft Access的登录表单上对此密码验证提供一些帮助...请理解这仅适用于学校项目,因此我不打算在此处创建一些超级强大的解决方案。 ;)

登录表单有一个用户名选择的组合框,它从我称为“用户”的用户表中查找记录,并且还有一个用于输入用户密码的字段(称为“Text8”)。 / p>

所以这就是我的代码:

Option Compare Database

Private Sub Command13_Click()

If IsNull(Me.Text8) Or Me.Text8 = "" Then
  MsgBox "You must enter a Password.", vbExclamation
    Me.Text8.SetFocus
    Exit Sub
End If

End Sub

当我切换到表单视图时,将密码字段留空并单击按钮,没有任何反应......

一旦我弄明白,我将扩展代码并输入输入的用户名/密码并使其查找“用户”表中的记录以查看是否存在匹配 - 如果存在,它们将是允许访问。

1 个答案:

答案 0 :(得分:2)

我怀疑没有任何反应,因为你的代码没有运行。检查命令按钮的click事件是否设置为[event procedure]

您可以通过设置断点并单步执行代码来确保达到代码。为此,将cusor放在合适的线上,比如第一行,然后按F9。现在,当您单击命令按钮时,如果代码完全正常工作,也就是说,如果到达子目录,则代码窗口将打开,您可以按F8单步执行代码。

您的代码没有任何问题,但我总是建议为控件使用合理的名称,而不仅仅是默认值。