per ogni nodox principale ci sono altri sotto nodi

per ogni sotto nodo ci sono all'interno vari elementi

come posso contare il vari elementi della treeview

questo e il codice che uso per polare la treeview
naturalmente in vb
grazie.




codice:
RSSQL2.MoveFirst
        Do Until RSSQL2.EOF
            sValue = Trim(RSSQL2.Fields("COD_AREA").value)
            sKey = "K" & sValue
            .Nodes.Add , , sKey, sValue & " - " & Trim(RSSQL2.Fields("DESCRIZIONE")), 1, 1
            sValue = "AG. - " & Trim(RSSQL2.Fields("SPORT").value)
            'sSQL = .Nodes.Count
            .Nodes.Add sKey, tvwChild, "L" & sValue, sValue & " - " & Trim(RSSQL2.Fields("DESCRIZIONE2")), 1, 2
            sKey = "L" & sValue
            sValue = "SETT. - " & Trim(RSSQL2.Fields("PROVA3"))
            SSQL = .Nodes.Count
            .Nodes.Add sKey, tvwChild, "M" & sKey & sValue, sValue, 1, 2
            sKey = "M" & sKey & sValue
            sValue = "COPE - " & Trim(RSSQL2.Fields("PROVA1"))
            .Nodes.Add sKey, tvwChild, "N" & sKey & sValue, sValue, 1, 2
            '.Nodes.Item(sKey).EnsureVisible
            RSSQL2.MoveNext
            'sSQL = .Nodes.Count
        Loop