主题：[求助]“导航”管理自动打开后不能完全加载

我在窗口管理里做了一个导航，设置自动打开，但是打开后不能完全加载，只显示加载全部记录，没有显示二级树目录。我在AfterLoad中设置的代码如下：

Dim tv As WinForm.TreeView
Dim bar As WinForm.NavBar = e.Form.Controls("NavBar1")
Dim nd As WinForm.TreeNode

bar.SelectedIndex=0
tv =e.Form.Controls("TreeView1")
    MainTable = Tables("S1室藏案卷")
    Tables("S1室藏案卷").OpenRecordGrid()
    Tables("S1室藏案卷").AutoSizeCols()
    tv.Nodes.Clear
    tv.BuildTree("S1室藏案卷", "分类号|保管期限")
    nd = tv.Nodes.Insert("加载全部记录","加载全部记录",0)
    Tables("S1室藏案卷.S2室藏文件").AutoSizeCols()

这个问题之前也有人提过，请问如何解决的？