TREEVIEW¶ÁÈ¡SQLÊý¾Ý£¿

±í½á¹¹ÈçÏ£º

SELECT cauth_id,cauth_name,igrade,pauth_id,pauth_name from MAIN_TREE01 ORDER BY CAUTH_ID

auth_id auth_name      igrade    pauth_id  pauth_name
ST ²Ö¿â¹ÜÀí  1 NULL   NULL
ST1 ÈÕ³£ÒµÎñ         2 ST   ²Ö¿â¹ÜÀí
ST101 Èë¿âµ¥         3 ST1   ÈÕ³£ÒµÎñ
ST102 ³ö¿âµ¥         3 ST1   ÈÕ³£ÒµÎñ
ST2 µ¥¾ÝÁÐ±í         2 ST   ²Ö¿â¹ÜÀí
ST201 Èë¿âµ¥Áбí 3 ST2   µ¥¾ÝÁбí
ST202 ³ö¿âµ¥Áбí 3 ST2   µ¥¾ÝÁбí
ST3 ±¨±í         2 ST   ²Ö¿â¹ÜÀí
ST301 ÏÖ´æÁ¿         3 ST3   ±¨±í

ÔõÑùµÝ¹éÏÔʾTREEVIEW1?

  Dim myComm As New SqlClient.SqlCommand("SELECT cauth_id,cauth_name,igrade,csupauth_id,csupauth_name from MAIN_TREE01 ORDER BY CAUTH_ID", sqlconnection1)
        Dim dr As SqlClient.SqlDataReader
        dr = myComm.ExecuteReader
        TreeView1.Nodes.Clear()   
        Do While dr.Read
            Dim i As Integer = dr.Item("igrade")
            If i = 1 Then
                TreeView1.Nodes.Add(dr.Item(&