عندي TreeView في مشروع باستخدام vs2012 وقاعدة بيانات sql2008 وتعمل بدون مشاكل وتقوم بملئ البيانات من جدول بالتصميم التالي كما في المرفقات
وكانت تعمل بدون مشاكل وأقوم الآن بتجربة المشروع على قاعدة بيانات موجودة من قبل بها نفس التصميم تظهر مشكلة كما في المرفقات الصرة 2 والغريب أن TreeView تظهر بها بيانات ولكن مختفية كما في المرفقات رقم 3 ولكن ليس كامل البيانات حيث تأتي عند سجل معين وتقف كما في الصورة رقم 5 عنده
وها الكود المستخدم
Try
DataSet_Sql.Clear()
Dim Sql_Sql As String = "Select * From A_ACCOUNT where
= '" & MDIParent1.All_Account_Comp.ComboBox.SelectedValue & "' order by code"
If Conn_SqL.State = ConnectionState.Open Then Conn_SqL.Close()
Conn_SqL.Open()
Dim DataAdapter_Sql As New SqlDataAdapter(Sql_Sql, Conn_SqL)
DataAdapter_Sql.Fill(DataSet_Sql, "A_ACCOUNT")
Conn_SqL.Close()
'Fill Tree view
TreeView1.BeginUpdate()
TreeView1.Nodes.Clear()
Dim MainHeader As New TreeNode("دليل الحسابات / Account Tree")
MainHeader.Tag = 0
TreeView1.Nodes.Add(MainHeader)
'Fill Sub Node
Add_Sub_Node(MainHeader)
TreeView1.EndUpdate()
TreeView1.ImageIndex = 0
TreeView1.SelectedImageIndex = 1
'TreeView1.Select()
Catch exp As Exception
MsgBox(exp.Message)
End Try
Private Sub Add_Sub_Node(ByVal Node As TreeNode)
Dim Dataview1 As DataView = DataSet_Sql.Tables("A_ACCOUNT").DefaultView
Dataview1.RowFilter = "AccFather =" & CType(Node.Tag, Integer)
For Each drLine As DataRowView In Dataview1
Dim SubNode As New TreeNode(drLine("Code") & " / " & drLine("AccName"))
SubNode.Tag = drLine("code")
Dim co As New ColorConverter
Dim color1 As New Color
color1 = co.ConvertFromString(drLine("Color_Level").ToString)
SubNode.ForeColor = color1
Node.Nodes.Add(SubNode)
If Not SubNode.Tag Is String.Empty Then
Add_Sub_Node(SubNode)
End If
Next
End Sub
أرجوا المساعدة في تحديد سبب المشكلة
