Library code snippets
Reading Treeview Children
By Kym Manson, published on 18 Mar 2002
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
Related articles
Related discussion
-
Run-time error '91'
by converter2009 (1 replies)
-
VB6 Runtime error 381 subsript out of range Error
by Uncle (2 replies)
-
passing and reading parameters from using Shell
by jigartoliya (0 replies)
-
Convert C++ code to VB6
by mawcot (4 replies)
-
listbox scrollbar
by Dennijr (10 replies)
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...
This thread is for discussions of Reading Treeview Children.