主题：状态栏显示在不同窗口切换问题

红袍老师，我的主界面如下：

 

此主题相关图片如下：窗口.png

 

我做了多个主窗口，基本上是每一张表一个主窗口，通过导航栏的按钮实现主窗口这个区域的各个窗口切换。每一个窗口的Afterload事件中设置： 

StatusBar.Message1 = "当前窗口:" & Forms("窗口名称").name

 

但是为什么我切换不同的窗口的时候，下方状态栏显示的文字不根据我切换的窗口变呢，好像第一次切换的时候会变，后面窗口切换的时候就还是第一次显示的文字。

 

 

 

 去编写SystemIdle事件

 

If Forms.activeform IsNot Nothing Then
    StatusBar.Message1 = "当前窗口:" & Forms.Activeform.name
Else
    StatusBar.Message1 = ""
End If

谢谢老师，这样方便多了，不用每个窗口加代码，直接放入项目事件中。