学步园

 Dim root As New TreeNode()
        root.Text = "根结点"
        Me.TreeView1.Nodes.Add(root)
        Dim node1 As New TreeNode()
        node1.Text = "子结点1"
        root.Nodes.Add(node1)
        Dim node2 As New TreeNode()
        node2.Text = "子结点2"
        root.Nodes.Add(node2)