1 Previous Next 

TreeView from a DataTable


This sample needs only a Treeview on a form and paste this code

Public Class Form1
'Making of the sample table
    Private Sub Form1_Load(ByVal sender As System.Object, _
    ByVal e As System.EventArgs) Handles MyBase.Load
        Dim dt As New DataTable
        dt.Columns.Add("ParentID")
        dt.Columns.Add("DetailId")
        dt.Columns.Add("Description")
        For i As Integer = 0 To 4
            For j As Integer = 0 To 4
                dt.LoadDataRow(New Object() {i.ToString, j.ToString, _
                ChrW(i + 65).ToString & ChrW(j + 65).ToString}, True)
            Next
        Next
'The actual Sample
        Dim t As TreeNode
        For i As Integer = 0 To dt.Rows.Count - 1
            Dim iprev As String
            If iprev <> dt.Rows(i)(0).ToString Then
                t = New TreeNode(dt.Rows(i)(0).ToString)
                TreeView1.Nodes.Add(t)
                iprev = dt.Rows(i)(0).ToString
            End If
            t.Nodes.Add(New TreeNode(dt.Rows(i)(1).ToString & _
            " " & dt.Rows(i)(2).ToString))
        Next
        TreeView1.ExpandAll()
    End Sub
End Class



1 Previous Next