1、系统已有的用户名：开发者、管理员，又增加了两个用户：科长、组长，密码都是123
2、设计了一个登录窗体，在登录窗体启动时，默认用户是：科长
3、启动了登录窗体后，在登录窗体设置了两个单选框控件，计划用来切换用户，当前是默认用户：科长
控件代码：
Dim 科长 As WinForm.radiobutton = e.Form.Controls("科长")
Dim 组长 As WinForm.radiobutton = e.Form.Controls("组长")
If 组长.checked = True Then
科长.checked = False
组长.ForeColor = Color.green
科长.ForeColor = Color.gray
Forms("登录窗体").Controls("页面集合").SelectedIndex = 1
If User.Name = "科长" Then
User.Name = "组长"
End If
End If
红色部分显示错误，请大师指点，说明书里叙述到设计一个全局变量，如果不设计全局变量，这里改怎么写？
加好友 
发短信
Post By：2018/1/13 17:28:00 [只看该作者]
