老师好:这段代码在AfterLoad事件中为什么不能正确执行?谢谢
Dim bar1 As WinForm.NavBar = e.sender
Select Case bar1.SelectedPage.ButtonText
Case "基础数据查询"
Dim tr As WinForm.TreeView
tr = Forms("共有窗口").Controls("TreeView1")
tr.Nodes(0).ExpandAll()
Case "审核报告"
Dim tr As WinForm.TreeView
tr = Forms("共有窗口").Controls("TreeView2")
tr.Nodes(0).ExpandAll()
End Select