显示当前登录用户？？？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 显示当前登录用户？？？

共有3658人关注过本帖树形打印复制链接主题：显示当前登录用户？？？

tina2012

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：童狐帖子：286 积分：2462 威望：0 精华：0 注册：2013/9/23 16:09:00

显示当前登录用户？？？ 发帖心情

Post By：2014/4/17 11:49:00 [显示全部帖子]

在窗口中增加一个按钮，用于显示当前登录用户，我是自定义的登录窗口，用户名保存在_UserName中，以下代码不能显示，怎么回事？？请帮忙

全局代码：

Public _UserName As String

Public _UserGroup As String

Public _UserId As String

Public _GroupId As String

按钮代码

MessageBox.Show("当前登录用户:" & _UserName)

点击之后，只显示“当前登录用户:”，用户名不能显示出来，怎么回事？？

tina2012

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：童狐帖子：286 积分：2462 威望：0 精华：0 注册：2013/9/23 16:09:00

Post By：2014/4/17 11:54:00 [显示全部帖子]

If e.Form.Controls("PassWord").Value = dr("Password") Then

_UserName = UserName

_UserGroup = dr("Group")

_UserId = dr("Id")

e.Form.Close

Else

Messagebox.show("密码错误!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)

End If

登陆后已经赋值了啊，

以下代码能起作用，状态栏里能显示，为什么？？

StatusBar.Message1= "当前用户:" & _UserName & " 今天日期:" & Date.Today

主题：显示当前登录用户？？？