找了论坛很久，没发现一个很快上手的权限实例，我理了一下思路，根据帮助里的树型权限分配实例进行梳理。
1、菜单导航做一个表，按登录用户和分组来过滤，并形成树型菜单。这一点感谢 有点甜 老师帮忙指正，已达效果：
以下是菜单过滤代码：
Dim dj As WinForm.TreeView = e.Form.Controls("单据查询菜单")
dj.BuildTree("菜单","子模块|菜单","[用户] Like '*" & User.group & "*' or [用户] Like '*" & User.name & "*'")
2、然后做一个按用户分配菜单权限，如下图所示：
此主题相关图片如下：未命名4.jpg
我看了帮助上的树形分配权限这个例子，实际就是这个功能，但是我想完全对调一下，按用户来进行分配菜单权限会更适应刚入门的用户。做到以下几个功能会更直观：
1）点用户（这里也可以延伸设分组），直接查看该用户所有的菜单权限，相当于做个选择节点查询。
2）在分配权限时，直观，勾选即把该用户添加到菜单对应用的用户栏里，去掉勾选就从用户栏里清除，一切都以保存按钮做结束。
只可惜我是新手，还没弄明白怎么弄，希望老师帮个忙，因为这个权限实例搞定了，会给入门的一个很直观的学习成就感。以下上传实例。
[此贴子已经被作者于2013-8-26 9:26:40编辑过]
加好友 
发短信
Post By：2013/8/24 21:51:00 [只看该作者]
