UC知道请vb高手帮忙
来源：百度知道 编辑：UC知道 时间：2024/05/14 12:10:06
就是在登陆的时候分不同用户登陆，若是“管理员”则在下个窗体中的特定事件能运行。看下这段代码：
If rs.Fields(2) = "管理员" Then '管理员是我定义的用户权限
admin = True
Else
admin = False
End If
这个是在登陆窗体里Command事件下的一段代码，已经连接数据库，并且可以分不同用户登陆，我想在登陆后的主窗体中的菜单下的某个事件只有管理员才能启动，代码该如何写呢？
我是这样写的：
if admin = true then
form2.show
else
msgbox "对不起，您不是管理员"
end if
为什么我用管理员登陆的，也提示“不是管理员”呢？
admin 我在模块里定义的，Public admin as boolean
If rs.Fields(2) = "管理员" Then '管理员是我定义的用户权限
admin = True
Else
admin = False
End If
这个是在登陆窗体里Command事件下的一段代码，已经连接数据库，并且可以分不同用户登陆，我想在登陆后的主窗体中的菜单下的某个事件只有管理员才能启动，代码该如何写呢？
我是这样写的：
if admin = true then
form2.show
else
msgbox "对不起，您不是管理员"
end if
为什么我用管理员登陆的，也提示“不是管理员”呢？
admin 我在模块里定义的，Public admin as boolean
admin是不是全局变量??
一定要把admin设置为全局变量！！！
把你click事件下的全部代码发上来看看
admin是不是全局变量呢？否则默认是false的，你应该用Option Explicit强制显式声明的，不知道对你有没有帮助