主题：模拟单击, 显示目录树问题

 你生成目录树的代码写在哪里？贴出完整代码。

试试改成

Dim t As Table = e.Form.Controls("Table1").Table

trv.BuildTree(t.DataTable, "部门|姓名")

 把生成的代码，写到表格的AfterFilter事件去

 请，根据你的项目代码，在例子上【重现】你的问题。然后把例子上传上来测试。

 生成目录树的代码，写在你加载数据的后面。

 你可以在你日期范围控件那里写代码。