Private Sub Page_load(ByVal sender As Object, ByVal e As EventArgs)
Me.Description = "Performance Sample"
Me.setPageData("LoadOnDmand", "aspnet_sort_after_edit")
PopulateTree()
End Sub
Private Sub PopulateTree()
For i As Integer = 0 To 10
Me.OboutTree.Nodes.Add(New Obout.Ajax.UI.TreeView.Node() With
{.Text = String.Format("Node {0}", i.ToString()), .Value = i.ToString(),
.ExpandMode = Obout.Ajax.UI.TreeView.NodeExpandMode.ServerSideCallback})
Next i
End Sub
Protected Sub OboutTree1_TreeNodeExpanded(ByVal sender As Object, ByVal e As Obout.Ajax.UI.TreeView.NodeEventArgs)
Dim node As Obout.Ajax.UI.TreeView.Node = e.Node
For i As Integer = 0 To 50
e.Node.ChildNodes.Add(New Obout.Ajax.UI.TreeView.Node() With
{.Text = String.Format("{0} {1}", e.Node.Text, i.ToString()), .Value = i.ToString(),
.ExpandMode = Obout.Ajax.UI.TreeView.NodeExpandMode.ServerSideCallback})
Next i
End Sub