老师你好：我现在每个窗口事件AfterLoad中都设置相同代码，有没有办法在打开项目中任何一个窗口时，自动增加到窗口的状态栏中，而不需要每个窗口去设置？
如：在打开项目中任何一个窗口时，先判断一下这个窗口有没有“e.Form.Strips("状态栏").Items("User")” 这个控件，如有则加载下面代码。
主要是写在哪个事件中比较合适？谢谢
Dim gs As DataRow = DataTables("系统设置").Find("小类 = '公司名称'")
Dim rj As DataRow = DataTables("系统设置").Find("小类 = '软件名称'")
Dim bbh As DataRow = DataTables("系统设置").Find("小类 = '软件版本号'")
e.Form.Strips("状态栏").Items("User").Text = " ★ ★ ★ " & User.Name & " ★ ★ ★ " & gs("值") & rj("值") & bbh("值") & " " & Format(Date.Today,"yyyy年MM月dd日dddd" )
加好友 
发短信
Post By：2018/7/6 13:30:00 [显示全部帖子]
