主题：谁有窗口中加载树的使用说明链接

LoadTree

Dim y As Integer = Date.Today.Year
Dim dt1 As New Date(y, 1, 1)
Dim dt2 As New Date(y, 12, 31)
Dim Filter As String
Filter = "报表日期 >= #" & dt1 & "# And 报表日期 <= #" & dt2 & "#"

Dim trv As WinForm.LoadTree = e.Form.Controls("LoadTree1")
trv.Build(Tables("成瓷报表"), "报表日期|质管员",5,Filter)

一直提示错误