主题：导航窗口

Dim Page As WinForm.TopicPage

Dim cnt1 As Integer = DataTables("橱柜订单表").Compute("Count(日期)","日期 = #"  & Date.Today & "#")

Dim cnt2 As Integer = DataTables("衣柜订单表").Compute("Count(日期)","日期 = #"  & Date.Today & "#")

Dim cnt3 As Integer = DataTables("预定金明细").Compute("Count(日期)","日期 = #"  & Date.Today & "#")

Dim cnt4 As Integer = DataTables("百货订购单").Compute("Count(日期)","日期 = #"  & Date.Today & "#")

Page = e.Form.Controls("TopicBar1").Pages.Add("每日订单统计","每日订单统计")

Page.Links.Add("今日橱柜新增单数","今日橱柜新增单数(" & cnt1 & ")" )

Page.Links.Add("今日衣柜新增单数","今日衣柜新增单数(" & cnt2 & ")" )

Page.Links.Add("今日预定新增单数","今日预定新增单数(" & cnt3 & ")" )

Page.Links.Add("今日百货新增单数","今日百货新增单数(" & cnt4 & ")" )

这是我在导航窗口里面设定的代码，可是当我点橱柜新增1单的时候，必须要把橱柜窗口点开，才能看到，橱柜窗口里面筛选过的橱柜订单表当日订 单，代码怎么改一下，可以让我一点击，就可以 看到橱柜窗口_橱柜订单表？