esempio

codice:
    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        If Not Me.IsPostBack Then
            Dim radice As String = "c:\"

            Me.TreeView1.Nodes.Clear()
            Dim nodo As New TreeNode(radice)
            nodo.SelectAction = TreeNodeSelectAction.Expand
            nodo.PopulateOnDemand = True
            nodo.Collapse()
            Me.TreeView1.Nodes.Add(nodo)

        End If
    End Sub