主题：求助：TopicBar显示统计信息问题

在窗口的AfterLoad事件中加了以下的代码：为什么窗口预览的时候“运营报表已上报”和“在售报表已上报”两个都能统计，而在日报表中增加数据后，再重新打开项目时，只是“在售项目报表已上报”显示信息，而“运营报表已上报”就不显示统计信息了呢？

Dim Page As WinForm.TopicPage
Dim cnt1 As Integer = DataTables("日报表").Compute("Count(_Identify)","日期 = #"  & Date.Today & "#")
Dim cnt2 As Integer = DataTables("在售项目资金日报").Compute("Count(_Identify)","日期 = #"  & Date.Today & "#")
Page = e.Form.Controls("TopicBar1").Pages.Add("报表上报情况","报表上报情况")
Page.Links.Add("运营报表已上报","运营报表已上报(" & cnt1 & ")" , "EmailSupport.ico")
Page.Links.Add("在售报表已上报","在售报表已上报(" & cnt2 & ")" , "EmailSupport.ico")

测试没有问题，是不是切换到开发者模式了，表数据是根据登录者进行筛选的

在设计窗口预览的时候是正常的，但如果你再次重新登录系统，统计的数据就不见了！
此主题相关图片如下：qq图片20160613091723.png

导航窗口->自动打开->False

谢谢，把窗口的自动打开设置成FALSE后可以了，谢谢！

我再想问下老师，上面的代码是放在窗口的AfterLoad事件中的，统计信息需要关闭项目，再重新打开后才能显示最新的统计信息，怎样能让统计信息及时的跟着表的变动显示最新统计信息呢？如果放在表的事件中，上面的代码又该如何写呢？

timertick事件

 

Dim Page As WinForm.TopicPage
Dim cnt1 As Integer = DataTables("日报表").Compute("Count(_Identify)","日期 = #"  & Date.Today & "#")
Dim cnt2 As Integer = DataTables("在售项目资金日报").Compute("Count(_Identify)","日期 = #"  & Date.Today & "#")
Page = e.Form.Controls("TopicBar1").Pages("报表上报情况")
Page.Links("运营报表已上报").Text = "运营报表已上报(" & cnt1 & ")"
Page.Links("在售报表已上报").Text = "在售报表已上报(" & cnt2 & ")"

 

http://www.foxtable.com/help/topics/1301.htm

 

谢谢老师！