求教:关于部门设置数据树的问题

gechunkai

假设集团下属二个母公司,每个母公司下属一个子公司,每个子公司均有办公室、财务部等部门。我希望能用数据树来把公司及部门关系表示出来。

数据树的设置语句是：object.Add(relative, relationship, key, text)

考虑到部门名称有重复，所以不以部门名称做KEY，而另外给部门编号，将部门编号作为relative和key。

部门表设置四个字段[部门编号],[部门名称],[部门级别]，[所属部门](注:实为所属部门的部门编号)

然后在窗体加载中根目录的语句为:

str部门编号 = rs(i)("部门编号")
str部门名称 = rs(i)("部门名称")
Set nodx = Me.tvw.Nodes.Add(, , str部门编号, str部门名称)

然而在执行中，系统报错：invalid key(无效的键)

向高手请教我其中哪里有出了错误，或者是有什么别的方法解决类似的问题。

关于数据

如能回复，不胜感激！！

fan0217

关于TreeView控件的使用,请参考:http://www.office-cn.net/forum.php?mod=viewthread&tid=38814



这里是个示例:http://www.office-cn.net/forum.php?mod=viewthread&tid=36888&replyID=&skin=1

[此贴子已经被作者于2006-4-15 10:57:05编辑过]

gechunkai

谢谢版主的回复。

参照例子,我做了二点更改:一是将部门编号及所属部门两个字段的类型改为数字,二是将nodes中的key加了个"a"&

问题得到解决.谢谢版主的例子.

(只是有点奇怪,为什么要加"a"&,这个更改很关键)

再次感谢版主.

[此贴子已经被作者于2006-4-15 14:59:40编辑过]