主题：[求助]系统信息显示的问题

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

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

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

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

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

赐教！！！