以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  请问如何判断目录树最后一层节点?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=93401)

--  作者:okok0611
--  发布时间:2016/11/27 22:27:00
--  请问如何判断目录树最后一层节点?
请问如何判断目录树最后一层节点?
--  作者:有点蓝
--  发布时间:2016/11/28 8:40:00
--  
参考:http://www.foxtable.com/webhelp/scr/0887.htm

Dim tr As WinForm.TreeView
tr = Forms("窗口1").Controls("TreeView1")
For Each node As WinForm.TreeNode In tr.AllNodes
    If node.Nodes.Count = 0 Then Output.Show("这是最后一层")
Next

--  作者:okok0611
--  发布时间:2016/11/28 10:18:00
--  
谢谢!