首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 数据库 > VFP >

VFP TREEVIEW平添子节点 KEY

2013-01-02 
VFP TREEVIEW添加子节点 KEY如题,我在用VFP作一个目录树,但是在创建子节点的时候,子节点的KEY值提示不唯一

VFP TREEVIEW添加子节点 KEY
如题,我在用VFP作一个目录树,但是在创建子节点的时候,子节点的KEY值提示不唯一
报错的内容:key is not unique in collection...

FOR i=1 TO 6
THIS.NODES.ADD(,,'LH'+ALLTRIM(STR(i)),area(i) ) &&第一级节点,地区
FOR j=1 TO 8
    key_xt='XT'+ALLTRIM(STR(j))
    this.nodes.add( 'LH'+ALLTRIM(STR(i)),4,key_xt,kind(j) ) &&第二级节点,系统分类
ENDFOR 
ENDFOR 

[解决办法]
你的代码改为:

For i=1 To 6
This.Nodes.Add(,,'LH'+Transform(i),Transform(i) ) &&第一级节点,地区
For j=1 To 8
This.nodes.Add('LH'+Transform(i),4,'XT'+Transform(i)+'_'+Alltrim(Str(j)),Transform(j) ) &&第二级节点,系统分类
Endfor
Endfor

热点排行