主题：关于目录树节点重复了

肯定是你重复添加了一次，不然不会重复的。看看其他事件代码。

肯定执行两次了。没有其他可能。

你根本就不需要写任何代码，或者加上清除的代码。

Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")
trv.Nodes.Clear()
Dim nd As WinForm.TreeNode
nd = Trv.Nodes.Add("权限管理","权限管理")
nd.Nodes.Add("成员权限与密码管理")
nd = Trv.Nodes.Add("通讯录","通讯录")
nd.Nodes.Add("联系人资料管理")
nd = Trv.Nodes.Add("订单管理","订单管理")
nd.Nodes.Add("订单统计")
nd = Trv.Nodes.Add("PMC模块","PMC模块")
nd.Nodes.Add("内部订单统计")
nd.Nodes.Add("BOM表")
nd.Nodes.Add("生产排程")
nd = Trv.Nodes.Add("仓库管理","仓库管理")
nd.Nodes.Add("库存明细")
nd.Nodes.Add("外协生产管理")
nd.Nodes.Add("成品入库")
nd.Nodes.Add("成品出库")
nd = Trv.Nodes.Add("财务管理","财务管理")
nd.Nodes.Add("客户采购与对账单管理")
nd.Nodes.Add("供应商采购与对账单管理")
nd.Nodes.Add("流水明细")
nd = Trv.Nodes.Add("薪酬体系","薪酬体系")
nd.Nodes.Add("员工考核与工资发放")