代码正确运行了，但treeview为何没有正常加载数据呢？

风中漫步

On Error Resume Next '此句是用来处理下面循环里面Index语句的
注释掉这句有什么反映

风中漫步

试了一下,有点麻烦.建议你看看todaynew斑竹的相关示例

你的代码能装到年级一层还算不错.它的判断方法返回的结果不能保证唯一.index挺陌生,好像没用过,大概是判断节点是否存在的,没猜错不存在的返回值是-1吧.如果你非有使用这种方式的爱好,建议你用判断路径的方法来试试.我测试可行,效果:

风中漫步

roych 发表于 2015-7-8 16:20
键值（key）有问题，请对比你的代码。

好,斑竹.
看了这段代码,觉的这个地方拿不准:
       If ActiveXCtl0.nodes(.Fields(3)).Index < 0 Then
            ActiveXCtl0.nodes.Add "K" & .Fields(2), 4, "KK" & .Fields(3), .Fields(3)
        End If
在装2年级的一班时, ActiveXCtl0.nodes(.Fields(3)).Index会不会给出已存在的情况.

如果测试通过了,那就是我看错了.呵呵,请斑竹告知.谢谢.

风中漫步

发个贴的功夫你们聊了这么多了.

风中漫步

这种方法感觉比较麻烦啊.再试试循环所有结点,比较路径的方法,看可行吧.
将每个key设为学生管理\年纪\班级