主题：自定义用户和授权

教材P1688上有一个自定义用户登陆与权限的案例，P1677还有一个目录树授权案例。请问如果采用自定用户登录设置的话，目录树授权案例中的代码需要做哪些修改？

窗口的AfterLoad事件代码为:

每次打开授权窗口后报错，我还以为是下面这个窗口afterload代码中的user信息需要修改？

Dim trv1 As WinForm.TreeView = e.Form.Controls("TreeView1")
Dim trv2 As WinForm.TreeView = e.Form.Controls("TreeView2")
trv1.BuildTree("授权","分组|权限")
For Each u As UserInfo In Users
    If u.Type = UserTypeEnum.User Then
        If trv2.Nodes.Contains(u.Group) = False Then
            trv2.Nodes.Add(u.Group)
        End If
        trv2.Nodes(u.Group).Nodes.Add(u.Name)
    End If
Next
Trv1.Nodes(0).Expand()
trv2.ExpandAll()

bin, 我看到了您2楼的指点，在此之前我也将自定用——户登录窗口中的所有user.name等调整为了_username 等 但对P1678这段代码不知道如何调整。所以贴了出来。