Members

Technology Zones

IBM Learning Center

Articles

Hosted By

MaximumASP

Info

Rated
Read 14,577 times

Related Categories

Reading Treeview Children

Kimmy

This is the code i use to read the children items from a treeview. You may have a treeview like this:

 Main Node
   + The Parent
    | - This is the first child
    | - This is the second child

just do:

Call ReadNodes("The Parent")

Note: this name MUST be the Key name/Index of the node to read


sub ReadNodes(sName as Variant)
   dim tvn as node

   set tvn = treeview1.nodes(sName)

   chil = tvn.Children: If chil = 0 Then Exit Sub     ' if no children the exit
   Set tvn = tvn.Child.FirstSibling
   
   For a = 1 To chil

      msgbox tvn.text  ' display a message with the child nodes name

      set tvn = tvn.next
   next
End Sub

Till the Roof comes off Till the Lights go out Till my Legs give out Can't shut my mouth I will not fall, my Wisdoms all.

Comments