判断目录树层数 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 判断目录树层数

共有2998人关注过本帖树形打印复制链接主题：判断目录树层数

nothing

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：二尾狐帖子：517 积分：3383 威望：0 精华：0 注册：2013/1/3 17:08:00

Post By：2014/6/1 9:41:00 [显示全部帖子]

Dim trv As WinForm.TreeView = e.Form.Controls("TreeView2")

Dim lv As Integer = 0

For Each nd As WinForm.TreeNode In trv.AllNodes

If nd.Level >lv

lv=nd.Level

End If

MessageBox.Show(lv)

nothing

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：二尾狐帖子：517 积分：3383 威望：0 精华：0 注册：2013/1/3 17:08:00

Post By：2014/6/1 9:48:00 [显示全部帖子]

Dim trv As WinForm.TreeView = e.Form.Controls("TreeView2")

Dim lv As Integer = 0

Dim mc As String

For Each nd As WinForm.TreeNode In trv.AllNodes

If nd.Level >lv

lv=nd.Level

mc = nd.FullPath

End If

MessageBox.Show("目录树层数:" & lv & " ,名称:" & mc)

用FullPath也可以判断

主题：判断目录树层数