哈哈！是的，这个比喻好形象

大佬！再请教：用你的递归遍历子节点，现在当我用这个查找子节点时，如果找到结果，则立即退出递归！请问：当满足条件时如何退出递归？谢谢！

Lparameters oNode,tcSelectKey
Local oCurNode,ChildKey,isIndetical
isIdentical = .F.
*ChildKey = oNode.Key
a = Alltrim(oNode.Key)
Messagebox(a+tcSelectKey,0,"")
If a == Alltrim(tcSelectKey)
    isIndetical = .T.
    Messagebox("相同了，找到啦！",0,"")
    Return                            &&这里应该退出了，并返回.T.，但是还是会继续下去，直至最后
Else
    isIndetical = .F.
Endif
If oNode.Children > 0
    oCurNode = oNode.Child
    Do While !Isnull(oCurNode)        
        This.findTreeNode(oCurNode,tcSelectKey)
        oCurNode = oCurNode.Next        
    Enddo
Endif
Return isIndetical

[此贴子已经被作者于2022-7-14 18:42编辑过]

这样呢？

Lparameters oNode,tcSelectKey

Local oCurNode,ChildKey

a = Alltrim(oNode.Key)
Messagebox(a+tcSelectKey,0,"")

If a == Alltrim(tcSelectKey)
    Messagebox("相同了，找到啦！",0,"")
    Return .F.                            &&这里应该退出了，并返回.T.，但是还是会继续下去，直至最后
Endif

If oNode.Children > 0
    oCurNode = oNode.Child
    Do While !Isnull(oCurNode) and This.findTreeNode(oCurNode,tcSelectKey)
        oCurNode = oCurNode.Next     
    Enddo
Endif

好像不是立即退出的，还要再递归一次才退出，而且退出后都返回T

[此贴子已经被作者于2022-7-14 20:18编辑过]

messagebox(a+tcSelectKey) 显示的是不是你需要的退出条件？

[此贴子已经被作者于2022-7-14 20:27编辑过]

那个是我看的输出结果，我条件是 a = tcSelectKey 现在解决了，我在外面加个变量，初始为.F.,然后找到后变为.T.，这样判断这个为.T.时就退出递归了，但是返回值都是.F.啊？

Lparameters oNode,tcSelectKey
Local oCurNode,ChildKey,isIndetical
isIdentical = .F.
*ChildKey = oNode.Key
a = Alltrim(oNode.Key)
Messagebox(a+tcSelectKey,0,"")
If a == Alltrim(tcSelectKey)
    isIndetical = .T.    
    Messagebox("相同了，找到啦！",0,"")
    isCheck = .T.  &&加了这个
    Return isIndetical                        
Endif
If oNode.Children > 0
    oCurNode = oNode.Child
    Do While !Isnull(oCurNode) 
        If isCheck = .t.  &&判断
           Exit 
        Else 
        This.findTreeNode(oCurNode,tcSelectKey)            
        oCurNode = oCurNode.Next
        EndIf         
    Enddo
Endif
Return isIndetical

[此贴子已经被作者于2022-7-14 20:42编辑过]

代码看上去怪怪的，逻辑不怎么对

应该是调用 findTreeNode 的地方或者传入的 oNode 不对

好的，我在研究研究，谢谢你！