你的意思是说用combobox选择数据库中的表吧，然后把这张表中的数据显示到treeview当中？请再描述清楚一些。

Private Sub combobox_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim db As database = New database
        '填充cbbDepCode
        Dim strSQL As String = "select 姓名 from"
        strSQL += " ygda order by 拼音词头"
        Dim dv As DataView = db.RunSelectSQL(strSQL)
        For Each drv As DataRowView In dv
            Me.cob1.Items.Add(drv("姓名"))
        Next
        db.Dispose()
上面是我做的一个程序的一部分，你看一下，是不是这个意思啊？？？

第一楼说的对，就是这个意思！！！！

获取SQL Svr数据库的所有表可以使用这个SQL语句
select name from sysobjects where xtype='U'
如果显示一张表的数据推荐用datagrid，而不是treeview
如果显示大类小类关系的时候用treeview比较合适，但是那样就不是一张表的内容了

[quote]Private Sub combobox_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim db As database = New database
        '填充cbbDepCode
        Dim strSQL As String = "select 姓名 from"
        strSQL += " ygda order by 拼音词头"
        Dim dv As DataView = db.RunSelectSQL(strSQL)
        For Each drv As DataRowView In dv
            Me.cob1.Items.Add(drv("姓名"))
        Next
        db.Dispose()
上面是我做的一个程序的一部分，你看一下，是不是这个意思啊？？？[/quote]

[quote]Private Sub combobox_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim db As database = New database
        '填充cbbDepCode
        Dim strSQL As String = "select 姓名 from"
        strSQL += " ygda order by 拼音词头"
        Dim dv As DataView = db.RunSelectSQL(strSQL)
        For Each drv As DataRowView In dv
            Me.cob1.Items.Add(drv("姓名"))
        Next
        db.Dispose()
上面是我做的一个程序的一部分，你看一下，是不是这个意思啊？？？[/quote]