Treeview control question

[BHostmeyer]

What i want to do is click on the the parent make it bold then make all the children under it bold also..

Any help would be appricated.

Thanks
Brooke.

[Serge]

If you have VB6, then it is very easy to do:

Private Sub TreeView1_NodeClick(ByVal Node As MSComctlLib.Node)
    Dim iIndex As Integer
    
    Node.Bold = True
    If Node.Children Then
        iIndex = Node.Child.FirstSibling.Index
        Do While iIndex <= Node.Child.LastSibling.Index
            TreeView1.Nodes(iIndex).Bold = True
            iIndex = iIndex + 1
        Loop
    End If
End Sub

If you have VB5 and earlier then Join the Club Again

------------------

Serge

Senior Programmer Analyst
[email protected]
[email protected]
ICQ#: 51055819


[This message has been edited by Serge (edited 02-22-2000).]