下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目5(1).table

版主，你好，如附件。

文件中，存在窗口 ,目录树 表A,含两个子目录“主管”“坐席员”

在用户管理中，也有“主管”，“坐席员”两个级别。

想实现，“坐席员”登陆时，无法显示目录树中的“主管”子目录，请问给如何操作。

请指导

窗口的AfterLoad事件，删除指定名称的节点即可。

Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")
If user.name = "坐席员" Then
    trv.Nodes(0).Nodes("表A_1").Delete()
End If
trv.ExpandAll()

提示，最好统一节点名称和标题，例如你的主管节点，标题是“主管”，名称确实“表A_1”，容易在编码的时候让你自己犯迷糊

好的 多谢了