Dim ary() As String = Functions.Execute("Xueqi")
cmd.CommandText = "Se lect 班级,a.学生编号 +学生姓名 As 学生姓名 From (({缴费信息} a LEFT JOIN(Sel ect 学生编号 From {问题学生} WHERE 学期 = '"& ary(1) &"') b ON a.学生编号 = b.学生编号) LEFT JOIN(Se lect 学生编号 From {问题家长} WHERE 学期 = '"& ary(1) &"') c ON a.学生编号 = c.学生编号) WHERE 学期 = '"& ary(1) &"' And 缴费项目 = '学费' And 缴费状态 = '已缴' And b.学生编号 Is Null ORDER BY 班级,a.学生编号"
dt = cmd.ExecuteReader()
Dim tr As WinForm.TreeView = e.Form.Controls("TreeView1")
tr.BuildTree(dt,"班级|学生姓名")
此主题相关图片如下:qq截图20170420091553.png
想把目录树第二节点学生编号隐藏(不是删除),后面要用。请指教,谢谢!
[此贴子已经被作者于2017/4/20 9:20:02编辑过]