[求助]请问这个tree 问题如何解决啊?老是出错

sysyj1030

如题,真是头大了
请哪位好心的高手 帮帮忙

kangking

GetSubNod 0
    Set TreeView.SelectedItem = TreeView.Nodes(1)
    Me.txtCARGOTYPE_NO = Val(Right(TreeView.Nodes(1).Key, Len(TreeView.Nodes(1).Key) - 2))
将上面的三句放在加载事件的最后。因为当你还没有树的时候是不能定位到某个节点的。
事件的顺序是打开事件－－加载事件－－。。。