Library code snippets

Reading Treeview Children

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

Comments

  1. 01 Jan 1999 at 00:00

    This thread is for discussions of Reading Treeview Children.

Leave a comment

Sign in or Join us (it's free).

Kym Manson 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.

Related discussion

Related podcasts

  • Christian Beauclair

    14 mai 2008 (�mission #0074) ::.Christian Beauclair: Stratégies de migration VB6 vers .NET Nous discutons avec Christian Beauclair des stratégies de migration VB6 vers .NET. Entre autres, nous discutons comment utiliser le "VB 6 Code Advisor" et le "Interop Forms Toolkit" pour ajouter la puiss...

Want to stay in touch with what's going on? Follow us on twitter!