关于treeview与数据库的问题，在线等。。。。

Question

CREATE TABLE [dbo].[IndustryA] (
[induAID] [char] (2) COLLATE Chinese_PRC_CI_AS NOT NULL ,
[induAName] [varchar] (255) COLLATE Chinese_PRC_CI_AS NULL 
) ON [PRIMARY] 
CREATE TABLE [dbo].[IndustryB] (
[induAID] [char] (2) COLLATE Chinese_PRC_CI_AS NOT NULL ,
[induBID] [char] (4) COLLATE Chinese_PRC_CI_AS NOT NULL ,
[induBName] [varchar] (255) COLLATE Chinese_PRC_CI_AS NULL 
) ON [PRIMARY] 
CREATE TABLE [dbo].[IndustryC] (
[induAID] [char] (2) COLLATE Chinese_PRC_CI_AS NOT NULL ,
[induBID] [char] (4) COLLATE Chinese_PRC_CI_AS NOT NULL ,
[induCID] [char] (6) COLLATE Chinese_PRC_CI_AS NOT NULL ,
[induCName] [varchar] (255) COLLATE Chinese_PRC_CI_AS NULL 
) ON [PRIMARY] 我创建了这3张表，现在我将这3张表的内容，放到treeview中，该如何实现？？在先等。。 a表示根目录，b表2级目录，c表3级目录   

Answer 1

http://www.microsoft.com/china/community/Column/30.mspx

Answer 2

#Region "树型列表"    Private Sub tree()
        TView1.Nodes.Clear()
        Dim i1 As Integer
        国 = oledb.selectsql("select 国家,备注 from a国家")
        'oledb.selectsql 返回datatable类型
        '国 定义为datatable
        For i1 = 0 To 国.Rows.Count - 1
            Dim 总国 As New TreeNode
            总国.Text = 国.Rows.Item(i).Item(0)
            总国.ImageIndex = 0
            总国.Tag = 国.Rows.Item(i).Item(1)
            TView1.Nodes.Add(总国)
            总国.Expand()            Dim i2 As Integer
            省 = oledb.selectsql("select 省份,备注 from b省份 where 国家='" & 总点国.Text & "'")
            '省 定义为datatable
            For i2 = 0 To 省.Rows.Count - 1
                Dim 分省 As New TreeNode
                分省.Text = 省.Rows.Item(i2).Item(0)
                分省.ImageIndex = 1
                分省.Tag = 省.Rows.Item(i2).Item(1)
                总国.Nodes.Add(分省)                Dim i3 As Integer
                市 = oledb.selectsql("select 地区,备注 from c地区 where 省份='" & 分点省.Text & "'")
                For i3 = 0 To 市.Rows.Count - 1
                    Dim 分市 As New TreeNode
                    分市.Text = 市.Rows.Item(i3).Item(0)
                    分市.ImageIndex = 2
                    分市.Tag = 市.Rows.Item(i3).Item(1)
                    分省.Nodes.Add(分市)                Next
            Next
        Next
    End Sub
#End Region这里面 国 省 市  都为单独的一个表
和你的形式差不太多
VB代码写的
翻译一下
可能我这样写处理的不好
希望对你有帮助