[rnmr]

جرب هذا

كود :

Dim Adp As New OleDbDataAdapter("select * from bank", Con)
Dim dt As New DataTable
Adp.Fill(dt)
Me.DataGridView1.DataSource = dt

TreeView_bank.Nodes.Add("0", "البنوك")

For Each r As DataRow In dt.Rows

    Dim bank_id As String = Int(r.Item("bank_id"))
    Dim bank_name As String = r.Item("bank_name")
    Dim bank_parent As String = Int(r.Item("bank_parent"))

    Dim node As TreeNode = TreeView_bank.Nodes.Find(bank_parent, True).FirstOrDefault
   node.Nodes.Add(bank_id, bank_name)

Next

TreeView_bank.ExpandAll()