VB.NET Type.FindMembers方法代码示例

OStack程序员社区-中国程序员成长平台 › 门户 › 编程› VB.NET›VB.NET教程

原作者: [db:作者] 来自: [db:来源] 收藏邀请

本文整理汇总了VB.NET中System.Type.FindMembers方法的典型用法代码示例。如果您正苦于以下问题：VB.NET Type.FindMembers方法的具体用法？VB.NET Type.FindMembers怎么用？VB.NET Type.FindMembers使用的例子？那么恭喜您, 这里精选的方法代码示例或许可以为您提供帮助。您也可以进一步了解该方法所在类System.Type的用法示例。

在下文中一共展示了Type.FindMembers方法的2个代码示例，这些例子默认根据受欢迎程度排序。您可以为喜欢或者感觉有用的代码点赞，您的评价将有助于我们的系统推荐出更棒的VB.NET代码示例。

示例1: MyFindMembersClass

' 导入命名空间
Imports System.Reflection

Class MyFindMembersClass

    Public Shared Sub Main()
        Dim objTest As New Object()
        Dim objType As Type = objTest.GetType()
        Dim arrayMemberInfo() As MemberInfo
        Try
            'Find all static or public methods in the Object 
            'class that match the specified name.
            arrayMemberInfo = objType.FindMembers(MemberTypes.Method, _
                              BindingFlags.Public Or BindingFlags.Static _
                              Or BindingFlags.Instance, _
                              New MemberFilter(AddressOf DelegateToSearchCriteria), _
                              "ReferenceEquals")

            Dim index As Integer
            For index = 0 To arrayMemberInfo.Length - 1
                Console.WriteLine("Result of FindMembers -" + ControlChars.Tab + _
                               arrayMemberInfo(index).ToString() + ControlChars.Cr)
            Next index
        Catch e As Exception
            Console.WriteLine("Exception : " + e.ToString())
        End Try
    End Sub

    Public Shared Function DelegateToSearchCriteria _
                            (ByVal objMemberInfo As MemberInfo, _
                             ByVal objSearch As Object) As Boolean
        ' Compare the name of the member function with the filter criteria.
        If objMemberInfo.Name.ToString() = objSearch.ToString() Then
            Return True
        Else
            Return False
        End If
    End Function 'DelegateToSearchCriteria 
End Class

开发者ID:VB.NET开发者，项目名称:System，代码行数:39，代码来源:Type.FindMembers

示例2: MainClass

' 导入命名空间
Imports System
Imports System.Reflection

 
Public Class MainClass

    Shared Sub Main(  )
         Dim t As Type = Type.GetType("System.Reflection.Assembly")

         Dim mbrInfoArray As MemberInfo(  ) = t.FindMembers( _
             MemberTypes.Method, _
             BindingFlags.Public Or _
             BindingFlags.Static Or _
             BindingFlags.NonPublic Or _
             BindingFlags.Instance Or _
             BindingFlags.DeclaredOnly, _
             Type.FilterName, "Get*")

         Dim inf As MemberInfo
         For Each inf In mbrInfoArray
             Console.WriteLine("{0} is a {1}", _
                 inf, inf.MemberType)
         Next
    End Sub
  
End Class

开发者ID:VB程序员，项目名称:System，代码行数:27，代码来源:Type.FindMembers

注：本文中的System.Type.FindMembers方法示例整理自Github/MSDocs等源码及文档管理平台，相关代码片段筛选自各路编程大神贡献的开源项目，源码版权归原作者所有，传播和使用请参考对应项目的License；未经允许，请勿转载。