[Visual Basic] Private Function RecurseNodes( _
ByVal Node As TreeNodeCollection _
) As Object
[Visual Basic] Private Function RecurseNodes(ByVal Node As TreeNodeCollection)
For Each tn As TreeNode In Node
If tn.Nodes.Count > 0 Then
tn.ImageIndex = 1
tn.SelectedImageIndex = 2
Else
tn.ImageIndex = 3
End If
RecurseNodes(tn.Nodes)
Next
End Function
Plattformen: Windows 98, Windows 2000 SP4, Windows Millennium Edition, Windows Server 2003, Windows XP Media Center Edition, Windows XP Professional x64 Edition, Windows XP SP2, Windows XP Starter Edition