主题：未引入对象

Dim cmd As New SQLCommand
Dim dt As DataTable
cmd.c区业务主管")
    cmd.CommandText = "SE LECT DISTINCT 学校名称, 年级, 班级  From {学生信息} "
Else
    cmd.CommandText = "SELE CT DISTINCT 学校名称, 年级, 班级  From {学生信息} where 学校名称 = '" & _usergroup & "'"
End If
dt = cmd.ExecuteReader()
Dim trv As WinForm.TreeView = Forms("学生信息").Controls("TreeView1")
trv.BuildTree(dt,"学校名称|年级|班级")

这段代码是说未将事例引入对象是错在哪里

 看看你的目录树事件吧，那里的代码错了。