=DLookUp("数量","表1","名称='" & [txt名称] & "'")
Private Sub dlqd_Click()
If IsNull(Me.登陆用户) Then
MsgBox "请输入用户名!", 0 + 64, "错误警告!"
ElseIf IsNull(Me.登陆密码) Then
MsgBox "请输入密码!", 0 + 64, "错误警告!"
ElseIf Me.登陆密码 <> DLookup("[密码]", "用户管理", "用户='" & [登陆用户] & "'") Then
MsgBox "用户名或密码不正确,请重新输入", 0 + 64, "错误警告!"
Me.登陆用户 = Null
Me.登陆密码 = Null
Me.登陆用户.SetFocus
Else
Me.Visible = False
DoCmd.OpenForm "ABC"
End If
End Sub
本文来源:https://www.wddqw.com/doc/58abd9b1ccbff121dd3683a7.html
正在阅读:
DLookup01-01
无犯罪记录证明公函模板(标准版)01-01
[浅谈,社会,分层,其他论文文档]浅谈社会分层对我国高等教育公平的影响及对策研究01-01
向中国人脱帽01-01
生命的脆弱01-01
祖宗十八代的称谓01-01
如饥似渴近义词及解释01-01
2012年高考清华01-01
学历和学力的作用01-01