1.建好用户表,表中设好用户名和密码字段及其内容;
2.登录窗体中,建立三个控件,一个用户名文本框,一个密码文本框,还有一个登陆按钮;
3.登录按钮的单击事件代码:
if isnull(me.用户名) or isnull(me.密码) then
msgbox "请输入正确的用户名和密码!"
elseif isnull(DLookup("密码","用户表","用户名='" & me.用户名 & "'")) then
msgbox "用户名不存在!"
elseif DLookup("密码","用户表","用户名='" & me.用户名 & "'")=me.密码 then
docmd.openform 窗体名称
else
msgbox "密码错误!"
end if
'祝你成功!