Dim daSuppliers As New SqlDataAdapter("SELECT CompanyName,SupplierID FROM Suppliers", objConn) 

Dim daProducts As New SqlDataAdapter("SELECT ProductName, ProductID, SupplierID FROM Products", objConn)

            daSuppliers.Fill(objDS, "dtSuppliers")

            daProducts.Fill(objDS, "dtProducts")
            //Giving the relation

objDS.Relations.Add("SuppToProd", _

    objDS.Tables("dtSuppliers").Columns("SupplierID"), _

    objDS.Tables("dtProducts").Columns("SupplierID"))

                Dim nodeSupp, nodeProd As TreeNode

                Dim rowSupp, rowProd As DataRow

For Each rowSupp In objDS.Tables("dtSuppliers").Rows

    nodeSupp = New TreeNode

    nodeSupp.Text = rowSupp("CompanyName")

    nodeSupp.value = rowSupp("SupplierID")

    TreeView1.Nodes.Add(nodeSupp)

         For Each rowProd In rowSupp.GetChildRows("SuppToProd")

             nodeProd = New TreeNode

             nodeProd.Text = rowProd("ProductName")

             nodeProd.value = rowProd("ProductID")

             nodeSupp.Nodes.Add(nodeProd)               

         Next

  Next

At the same time i need to improve the performance because supplier table has more than1000 records and product table has 3000 records.How can i do this one.