求助一个treeview第三级节点添加的问题.

[weixin_42337227]

想做一个3级树结构，在添加第三级节点时候报错
第一级是序号，第二级是姓名，第三级是日期
这个代码运行的时候报错 element not found..

This.LineStyle= 1 && tvwRootLines
This.Style= 7 && tvwTreelinesPlusMinusPictureText
This.ImageList=Thisform.Imagelist1 &&与Imagelist控件建立关联
sele xuhao
replace ALL 项目编号 with"B"+ALLTRIM(STR(RECNO()))
replace ALL key with"C"+ALLTRIM(STR(RECNO()))
replace ALL key2 with"D"+ALLTRIM(STR(RECNO()))
replace ALL key3 with"E"+ALLTRIM(STR(RECNO()))
sele xuhao1
replace ALL 项目编号 with"B"+ALLTRIM(STR(RECNO()))
replace ALL key with"C"+ALLTRIM(STR(RECNO()))
replace ALL key2 with"D"+ALLTRIM(STR(RECNO()))
replace ALL key3 with"E"+ALLTRIM(STR(RECNO()))




SELECT xuhao
SET DELETED ON
GO TOP
DO WHILE !EOF()
&&添加部门节点，以唯一的部门编号字段作为控件的Key
This.Nodes.Add(,,ALLTRIM(xuhao.项目编号),;
ALLTRIM(xuhao.序号),1,2)

*（ 属于，子节点，名称，标题）节点的名称就用编号，子节点的属于就用节点的名称，就是部门编号。

SELECT xuhao1
SET DELETED ON
SET FILTER TO ALLTRIM(xuhao1.项目编号)=;
ALLTRIM(xuhao.项目编号)
GO TOP

&&添加部门中人员节点，以唯一的Key字段值作为控件的Key
DO WHILE !EOF()
This.Nodes.Add(ALLTRIM(xuhao.项目编号),4,;
ALLTRIM(xuhao1.Key),ALLTRIM(xuhao1.姓名),3,3)
SKIP





*****treeview 第三级begin 修改这部分
SELECT xuhao2
SET DELETED ON
SET FILTER TO ALLTRIM(xuhao2.key2)=;
ALLTRIM(xuhao1.key2)
GO TOP

&&添加部门中人员节点，以唯一的Key字段值作为控件的Key
DO WHILE !EOF()
This.Nodes.Add(ALLTRIM(xuhao1.key2),4,;
ALLTRIM(xuhao2.Key3),ALLTRIM(xuhao2.联系人),3,3)
SKIP
ENDDO
*****treeview 第三级end



ENDDO

SELECT xuhao
SKIP
ENDDO
SELECT xuhao1
SET FILTER TO
GO TOP
SELECT xuhao2
GO TOP

[無法替代]

第二级的键值用的是 ALLTRIM(xuhao1.Key) 但第三级用的上级键值是 ALLTRIM(xuhao1.key2) key2和key一样吗？ 是不是key2改成key就好了？