以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 请问treeview 可指定打开时显示几层吗? (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=104789) |
-- 作者:tennis -- 发布时间:2017/8/5 6:31:00 -- 请问treeview 可指定打开时显示几层吗? treeview显示 有打开与收起,可指定打开几层以下皆收起吗?代码如何写? 3Q!! [此贴子已经被作者于2017/8/5 6:31:46编辑过]
|
-- 作者:有点蓝 -- 发布时间: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 -- 发布时间:2017/8/5 11:26:00 -- 3Q!! |