在一个验证窗体中输入下列代码,可是无论我输入的“用户名”在不在我的用户表中,运行时就会出现下图提示不知道为什么?请指教....感谢!
Private Sub form_load()
Me.用户名 = ""
Me.密码 = ""
Me.用户名.SetFocus
End Sub
Private Sub cmd1_click()
If Me.密码 = DLookup("pass", "用户表", "user=" & Me.用户名) And Me.用户名 <> "" Then
DoCmd.Close
DoCmd.OpenForm "录入窗体"
End If
End Sub