主题：关于自定义加载树的问题？

我在一个窗口里用了一个页面集合的控件，插入了库存，入库，出库3个表，可不可以在一个窗口的Afterload时间里，做3个自定义加载树。

我的代码如下：

Dim cmd As New SQLCommand
Dim dt As DataTable
cmd.C
cmd.CommandText = "SELECT DISTINCT 排单完成,Year(排单日期) As 年, Month(排单日期) As 月, Day(排单日期) As 日 ,选择人员 From {后期机器排单}"
dt = cmd.ExecuteReader()
Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")
trv.BuildTree(dt,"排单完成|年|月|日|选择人员")
trv.Nodes.Insert("加载所有数据",0)

'加载第一页数据
With DataTables("后期机器排单")
    .LoadFilter = "" '清除加载条件
    .LoadPage = 0 '加载第一页
    .LoadOver="_Identify"
    .LoadTop = 8
    .Load()
    e.Form.Controls("TextBox1").Value = 1 & "/" & .TotalPages
End With

'加载第一页数据
With DataTables("后期手工排单")
    .LoadFilter = "" '清除加载条件
    .LoadPage = 0 '加载第一页
    .LoadOver="_Identify"
    .LoadTop = 8
    .Load()
    e.Form.Controls("TextBox2").Value = 1 & "/" & .TotalPages
End With

关闭窗口以后没有错误提示，而且功能也实现了？这样就没有问题了吧，老师。