UltraWebTree的问题？？？？

Question

可以,啊你可以找datakey
我这有一个,你可以看看
Overloads Function FindTreeNode(ByVal nodes0 As Infragistics.WebUI.UltraWebNavigator.Nodes, ByVal xmmc As String) As Infragistics.WebUI.UltraWebNavigator.Node
        'xmcm=text 或者datakey
        Dim anode, result As Infragistics.WebUI.UltraWebNavigator.Node
        Dim obj As Object
        For Each anode In nodes0
            obj = anode.DataKey
            If obj Is Nothing Then obj = ""
            If (anode.Text.IndexOf(xmmc) = 0) Or (obj.ToString.IndexOf(xmmc) = 0) Then
                result = anode
                Return anode
                Exit Function
            ElseIf anode.Nodes.Count > 0 Then
                result = FindTreeNode(anode.Nodes, xmmc)
                If Not (result Is Nothing) Then
                    Return result
                    Exit Function
                End If
            End If
        Next
    End Function