Foxtable(狐表)用户栏目专家坐堂 → 关于目录树,如何取出目录树的最底级


  共有2175人关注过本帖树形打印复制链接

主题:关于目录树,如何取出目录树的最底级

帅哥哟,离线,有人找我吗?
allenyen
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:98 积分:1352 威望:0 精华:0 注册:2012/12/30 12:52:00
关于目录树,如何取出目录树的最底级  发帖心情 Post By:2018/9/12 19:49:00 [只看该作者]



勾选目录树时 如何将目录树最底级以'AAAA','BBBB','CCCC','DDDD' 的模式填充
[此贴子已经被作者于2018/9/12 20:11:23编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/9/12 20:05:00 [只看该作者]

Dim str As String = ""

for each nd As object in trv.allnodes

    If nd.nodes.count = 0 andAlso nd.checked Then

        str &= nd.text & ","

    End If

next

msgbox(str.trim(","))


 回到顶部