这是一个人力资源管理系统,可我在登陆窗口(用户名administrator,密码为空)时,点击确定,提示系统错误,对象变量或with模块变量未设置91.我初学VB,不是很懂,请问谁能帮我看看.谢谢!

icYjD4xf.rar (195.74 KB) 系统错误,对象变量或with模块变量未设置91.怎么改?

If Trim(txtPassword) = Trim(mrc!Password) Then
sUserName = Trim(txtUserName)
If Permission(sUserName, 10, 19) = True Then
OK = True

你把文本中的""字符都去掉了,当你密码为空时当然会出错啊!我建议使用文本类型,就不要加trim了