我设计了一个导航窗口，如附件所示
现在有一个问题，就是我希望一打开项目时，显示案卷库的所有数据，右边的导航分三级形成目录树：保管期限，年度，分类号。
但是我这边打开项目时，导航中“案卷库”下只显示“加载全部记录”这一行，
此主题相关图片如下：1.jpg
等我点击导航中的其他版块后，再选择“案卷库”，却又可以形成三级的目录树（因为我数据中分类号这一字段都为空值，所以这边的分类号一级没有显示），这是什么原因？
此主题相关图片如下：2.jpg
我在导航窗口的Afterload事件中输入了如下代码：
以下内容为程序代码:
1 Dim tv As WinForm.TreeView = e.Form.Controls("TreeView1")
2 Dim bar As WinForm.NavBar = e.Form.Controls("NavBar1")
3 '
4 Dim nd As WinForm.TreeNode
5 MainTable = Tables("ajk")
6
7 Bar.SelectedIndex=0
8 Tables("ajk").OpenRecordGrid()
9 Tables("ajk").AutoSizeCols()
10
11
12 tv.Nodes.Clear
13 tv.BuildTree("ajk", "bgqx|nt|flh")
14 nd = tv.Nodes.Insert("加载全部记录","加载全部记录",0)
[此贴子已经被作者于2012-1-19 15:45:32编辑过]
加好友 
发短信
Post By：2012/1/19 15:37:00 [只看该作者]
Post By：2012/1/19 15:46:00 [只看该作者]
