Dim trv1 As WinForm.TreeView = e.Form.Controls("TreeView1")Dim trv2 As WinForm.TreeView = e.Form.Controls("TreeView2")trv1.BuildTree("授权管理","分组|权限")trv2.BuildTree("users","group|name")Trv1.Nodes(0).Expand()trv2.ExpandAll()