For Each AvlTree (gb.data)
Dim hAvlTree
As AvlTree
Dim aVariant
As Variant
For Each aVariant
In hAvlTree
...
Next
Visit each element of the tree in-order, i.e. from the smallest key to the greatest. The
Key property of the tree is set according to the value in the enumerator.
Example
Code
|
May produce
|
Dim v As Variant
Print "Key", "Value" For Each v In hTree Print hTree.Key, v Next
|
Key Value a 1 b 11 c 5
|