K_"
            If (Node.Image &lt;&gt; "CHECK_YES" &amp; sPf) Then
                ' Set to check full and set others in
                ' the hierarchy accordingly:
                Node.Image = "CHECK_YES" &amp; sPf
                If (Node.Children &gt; 0) Then
                    pRecurseSetChildren Node, "CHECK_YES" &amp; sPf
                End If
                bAllOn = pbCheckForAll(Node, "CHECK_YES" &amp; sPf)
                If (bAllOn) Then
                    pRecurseSetParents Node, "CHECK_YES