以下是引用卟离卟弃在2009-7-11 16:48:00的发言：
表B的窗口AfterLoad事件代码
Dim cmd As New SQLCommand
Dim dt As DataTable
cmd.C
cmd.CommandText = "SELECT DISTINCT 工段,生产任务单号 From 车间工段计划"
dt = cmd.ExecuteReader()
Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")
trv.BuildDataTree(dt, "","工段", "生产任务单号")
你试试这个代码：
Dim cmd As New SQLCommand
Dim dt As DataTable
cmd.C
cmd.CommandText = "SELECT DISTINCT 工段,生产任务单号 From 车间工段计划"
dt = cmd.ExecuteReader()
If dt Is Nothing Then Messagebox.show("111")
Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")
trv.BuildDataTree(dt, "","工段", "生产任务单号")
看看有没有提示“111”
[此贴子已经被作者于2009-7-11 17:31:36编辑过]
加好友 
发短信
Post By：2009/7/11 17:31:00 [显示全部帖子]
