Asp Control ASP.Net

<%@ Page Language="VB" %>
    
   Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs)
        If TreeView1.CheckedNodes.Count > 0 Then
            For Each node As TreeNode In TreeView1.CheckedNodes
                Label1.Text += node.Text & " " & node.Parent.Text & "
"
            Next
        Else
            Label1.Text = "You didn't select anything. Sorry!"
        End If
   End Sub



    Latest Hardware


    
                 DataSourceID="XmlDataSource1" ShowCheckBoxes="Leaf">
            
                                 Text="Computer Hardware" />
                
                
            

        
        


                 OnClick="Button1_Click" />
        


                 DataFile="Data.xml">
        
       


       
    


File: Data.xml