主题：LoadUserSetting事件属性中如何用全局函数定义的变量

全局代码  ：

Public _UserName As String  '用户名称

登录窗体：

确定登录后 会执行   _UserName=dr("姓名")

LoadUserSetting代码

Select Case _UserName
    Case "张三"
        MessageBox.Show("我是张三")
    Case "张三1"
        MessageBox.Show("我是张三1")

End Select

登录窗体切换用户登录时，不弹出上面的我是张三或我是张三1

想实现在自定义登录窗体中切换用户登录时，LoadUserSetting这个能够判断用户，然后执行一些数据的加载与变化