Asp.net—递归方式的FindControl

 1    /**/''' <summary>
 2    ''' 递归寻找符合条件的控件。
 3    ''' </summary>
 4    ''' <param name="Parent">父控件。</param>
 5    ''' <param name="Type">欲寻找的控件型别。</param>
 6    ''' <param name="PropertyName">比对的属性名称。</param>
 7    ''' <param name="PropertyValue">比对的属性值。</param>
 8    Public Overloads Shared Function FindControlEx()Function FindControlEx(ByVal Parent As System.Web.UI.Control, ByVal Type As System.Type, _
 9        ByVal PropertyName As String, ByVal PropertyValue As Object) As Object
10        Dim oControl As System.Web.UI.Control
11        Dim oFindControl As Object
12        Dim oValue As Object
13
14        For Each oControl In Parent.Controls
15            If Type.IsInstanceOfType(oControl) Then
16                '取得属性值
17                oValue = GetPropertyValue(oControl, PropertyName)
18                If oValue.Equals(PropertyValue) Then
19                    Return oControl '型别及属性值皆符合则回传此控件
20                End If
21            Else
22                If oControl.Controls.Count > 0 Then
23                    '递归往下寻找符合条件的控件
24                    oFindControl = FindControlEx(oControl, Type, PropertyName, PropertyValue)
25                    If oFindControl IsNot Nothing Then
26                        Return oFindControl
27                    End If
28                End If
29            End If
30        Next
31        Return Nothing
32    End Function
33
34    /**/''' <summary>
35    ''' 取得对象的属性值。
36    ''' </summary>
37    ''' <param name="Component">具有要撷取属性的对象。</param>
38    ''' <param name="PropertyName">属性名称。</param>
39    Public Shared Function GetPropertyValue()Function GetPropertyValue(ByVal Component As Object, ByVal PropertyName As String) As Object
40        Dim Prop As PropertyDescriptor = TypeDescriptor.GetProperties(Component).Item(PropertyName)
41        Return Prop.GetValue(Component)
42    End Function

        Dim oLinkButton As LinkButton
        oLinkButton = CType(FindControlEx(FormView1, GetType(LinkButton), "CommandName", "Insert"), LinkButton)

        Dim oButtonControl As IButtonControl
        oButtonControl = CType(FindControlEx(FormView1, GetType(IButtonControl), "CommandName", "Insert"), IButtonControl)