主题：[求助]]这些系统信息是如何实现的？

此主题相关图片如下：无标题.jpg

我是这样做的：在窗口中加了一个文本框，然后在afterloadproject事件中添加

With Forms("导航窗口").Controls("textbox1")
    .Value = User.Name
End With

初次登陆后确实是我想要的结果，但是切换用户后，仍然显示的是前一个用户名，重新加载项目也是一样。

请教，为何？是写错了还是写错位置了？

我想要的结果就是小刺猬的一个软件中的那个效果。

赐教！！！

就拿本贴中的那个图片来说，我觉得是在一个窗体中加入了一个面板，然后在该窗体的afterload中让这个面板区域中显示这些信息的，不知道说得对不对？如果是，具体代码，哪位大侠写一段？

我主要是搞不清楚如何让这些信息在面板中显示。