我没有用系统提供的登录界面,而是自行设计了一个窗口,设置了用户名称和密码
另外又设计了一个主窗口,其中增加了四个按钮,分别为编辑,查询,打印,和退出系统四块,我想把每一块按钮的权限分别设置,比如,编辑按钮只有财务人员可以用,其他用户都不可以,下面的代码有什么问题吗,总是提示“登录窗口已关闭,无法引用ComboBox1用户名称该控件。
Dim t As WinForm.ComboBox = Forms("登录窗口").Controls("ComboBox1用户名称")Select Case t.valueCase "财务人员"Forms("主窗口").closeForms("piao据编辑窗口").showCase "财务主管","管理者"MessageBox.show("您无权执行此操作!")End Select