主题：[原创]如何取出树中的节点到字符串

如何取出树中的节点到字符串?下面的代码怎么不行?

 

Dim tr As WinForm.TreeView = Forms("定位树").Controls("TreeView1")

Dim Vals() As String = tr.allnodes

Dim tr As WinForm.TreeView = Forms("定位树").Controls("TreeView1")

output.show(tr.SelectedNode.fullpath)

解决了,谢谢.另外,将某字段中左边都是"中国\上海"字符串全改成"中国\北京",用什么语句改?

Dim s As String  = "abcd"
s=s.replace("a","b")  
output.show(s)

不是的,是把某字段中所有的"ab"全部换成"中国"

如:

abcd

ab南京

ab北京

ab上海

 

全部改成:

中国cd

中国南京

中国北京

中国上海

for each r as row in currenttable.rows

      r("字段") = r("字段").replace("ab","中国")

next

 

谢谢,MR725真是高手.还有啊,怎么判断某个树节点是不是是低一级?好象没有方法.

node不是有level属性吗：

 

http://help.foxtable.com/topics/0907.htm

 

我上面没讲清楚,我是要判断这个节点是不是最底层节点,如何判断?

Dim tr As WinForm.TreeView = Forms("定位树").Controls("TreeView1")

if tr.SelectedNode.nodes.count = 0

     return "是最低层啦"

end if