The TreeView control that comes with VB 6 has a 'Sorted' boolean property that sorts the nodes in the control. However, it seems that if you fill a TreeView with a parent (root) node that has children, the sorted property no longer functions. Does anyone know if this is by design, or if there is a work-around?

For example:

Dim oNode As Node
Set oNode = TreeView1.Nodes.Add(,,"root","root")
Set oNode = TreeView1.Nodes.Add("root",tvwChild,,"b")
Set oNode = TreeView1.Nodes.Add("root",tvwChild,,"a")
TreeView1.Sorted = True

This code should fill the TreeView as follows:
--------------
root
.
...a
.
...b
--------------
however... it does not work.