Foxtable(狐表)用户栏目专家坐堂 → 请问treeview 可指定打开时显示几层吗?


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

主题:请问treeview 可指定打开时显示几层吗?

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


加好友 发短信
等级:六尾狐 帖子:1433 积分:10763 威望:0 精华:0 注册:2013/3/29 10:23:00
请问treeview 可指定打开时显示几层吗?  发帖心情 Post By:2017/8/5 6:31:00 [只看该作者]

treeview显示 有打开与收起,可指定打开几层以下皆收起吗?代码如何写? 3Q!!
[此贴子已经被作者于2017/8/5 6:31:46编辑过]

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


加好友 发短信
等级:超级版主 帖子:110738 积分:563610 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/8/5 8:57:00 [只看该作者]

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

For Each n As WinForm.TreeNode In trv.Nodes
    n.Expand
    For Each n1 As WinForm.TreeNode In n.Nodes
        n.Expand
    Next
Next


Dim lv As Integer = 0
Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")

For Each n As WinForm.TreeNode In trv.AllNodes
    If n.Level <= lv
        n.Expand
    End If
Next

还可以使用递归实现吗,自己思考一下


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


加好友 发短信
等级:六尾狐 帖子:1433 积分:10763 威望:0 精华:0 注册:2013/3/29 10:23:00
  发帖心情 Post By:2017/8/5 11:26:00 [只看该作者]

3Q!!

 回到顶部