主题：权限设置按钮错误解决

 图片或例子或代码发上来。

 完整代码贴上来

 这段代码不会报这个错，完整的报错是怎样的？是不是提示什么控件不存在？

 这段代码没有错，做个例子上来看看

 呃，感觉也不会报错啊，你去掉这句代码看看 Trv1.Nodes(0).Expand()

 

 不行，请上传例子，有可能是其它地方影响了。

 方法1：给默认用户指定一个分组；

 

 方法2：用下面的代码

 

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.Group > "" AndAlso 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()