以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 目录树 层数 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=98343) |
-- 作者:wei0769 -- 发布时间:2017/3/28 12:48:00 -- 目录树 层数 可以用 level 知道当前的层数,怎样知道目录树有多少层? |
-- 作者:有点蓝 -- 发布时间:2017/3/28 14:30:00 -- 循环所有节点,获取level的最大值 |
-- 作者:wei0769 -- 发布时间:2017/3/28 16:13:00 -- 能否写成一个 函数 给我们调用
发现没有下级节点,调用下级节点也不会出错 |
-- 作者:有点色 -- 发布时间:2017/3/28 17:14:00 -- Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1") Dim mlvl As Integer = 0 For Each nd As WinForm.TreeNode In trv.AllNodes If nd.Level > mlvl Then mlvl = nd.level End If Next msgbox(mlvl) |