标题：【已解决】请问菜单的目录树是如何生成的？

1楼

hanxuntx 发表于：2011/12/20 22:05:00

图片点击可在新窗口打开查看此主题相关图片如下：qq截图20111220220444.png

请问生成这个目录树的代码是什么?

是否又用到了递归函数？

[此贴子已经被作者于2011-12-21 10:29:50编辑过]

2楼

狐狸爸爸 发表于：2011/12/20 22:10:00

这个和编程无关的。

3楼

hanxuntx 发表于：2011/12/20 22:54:00

狐爸我现在做一个权限系统

需要动态获得菜单目录树

所以问一下如何写这个生成菜单目录树的代码

4楼

狐狸爸爸 发表于：2011/12/21 10:02:00

Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")
For Each tab As RibbonMenu.Tab In RibbonTabs
    Dim nd1 As WinForm.TreeNode = trv.Nodes.add(tab.Name)
    For Each grp As RibbonMenu.Group In tab.Groups
        Dim nd2 As WinForm.TreeNode = nd1.Nodes.add(grp.Name)
        For Each itm As RibbonMenu.RibbonItem In grp.Items
            nd2.Nodes.add(itm.Name)
        Next
    Next
Next

5楼

hanxuntx 发表于：2011/12/21 10:30:00

谢谢

共5 条记录, 每页显示 10 条, 页签: [1]