主题：请教：如何用代码定位到内置筛选树的指定节点？

比如

For Each a As OBJECT In Tables("表A").grid.Parent.controls
    For Each b As OBJECT In a.controls
        If B.text = "筛选树" Then
            Dim trv = b.controls(0).controls(0)
            trv.visible = True
            trv.Selectednode = trv.nodes(3)
        End If
    Next
Next