以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  tabcontrol中的动态目录生成  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=65113)

--  作者:新航程小何
--  发布时间:2015/3/9 15:25:00
--  tabcontrol中的动态目录生成

各位老师,我想通过代码实现对同一张表生成两个目录树:当我切换tabpages的时候,可以动态的生成目录树,在两个page中生成的目录树不一样,但结果运行时,两个page上显示的目录却是一样,请老师帮忙:

Dim tab As WinForm.TabControl = e.Form.Controls("TabControl1")
Dim cmd As New SQLCommand
Dim dt As DataTable
cmd.c
If tab.SelectedIndex = 0 Then
    cmd.CommandText = "SELECT DISTINCT 所属生产活动,所属分类,知识点名称 F rom {知识点} where 所属流程环节=\'种植\' "
    dt = cmd.ExecuteReader()
    Dim trv1 As WinForm.TreeView = e.Form.Controls("TreeView1")
    trv1.BuildTree("知识点", "所属生产活动|所属分类|知识点名称")
ElseIf tab.SelectedIndex = 1 Then
 cmd.CommandText = "SELECT DISTINCT 所属生产活动,所属分类,知识点名称 F rom {知识点} where 所属流程环节=\'生产\' "
    dt = cmd.ExecuteReader()
    Dim trv2 As WinForm.TreeView = e.Form.Controls("TreeView2")
    trv2.BuildTree("知识点", "所属生产活动|所属分类|知识点名称")

End If


--  作者:新航程小何
--  发布时间:2015/3/9 15:28:00
--  

我刚测试对了,把“知识点”没有改成dt