建立一个数据库，管理员具有添加用户功能，普通用户只有修改自己密码的功能，在登录窗口之后需要做两个不同的窗体吗，能不能只做一个窗体，根据登录用户不同自动出现相应功能

一个窗体就够了，在窗体加载时判断管理权限，根据不同的权限加载不同的功能

怎样根据权限加载菜单啊

示例
Private Sub Command1_Click()
If Forms![主窗体]![text1] = DLookup("[username]", "user", "[ID] = 'admin'") Then   '验证用户权限
DoCmd.OpenForm "窗体1"
 Else
  MsgBox "对不起,你当前登录的身份是操作员,不能使用本功能!"
  End If

楼上老师的代码只是打开窗体，如果在窗体1中有自定义菜单，登录者不是管理员话就禁用窗口1的一些菜单代码是什么