Define Attributes and Use Reflection to get its value

  
Imports System.Reflection


Public Class MainClass

   Public Shared Sub Main()
        Dim MethodObj As System.Reflection.MethodInfo

        Dim MessageDemo As New Demo()

        For Each MethodObj In MessageDemo.GetType.GetMethods()
            Dim Attr As Attribute
            For Each Attr In MethodObj.GetCustomAttributes(False)
                Console.WriteLine(MethodObj.Name)
                Console.WriteLine(Attr)
                Console.WriteLine(CType(Attr, UserName).Name)
            Next
        Next
   
   End Sub

End Class 



Class UserName
    Inherits Attribute

    Public Name As String 

    Public Sub New(ByVal Name As String)
        MyBase.New()
        Me.Name = Name
    End Sub
End Class

Class Demo

    <UserName("Name 1")> Sub DemoMsg()
        Console.WriteLine("Message")
    End Sub

    <UserName("Name 2")> Sub Greet()
        Console.WriteLine("Hello")
    End Sub

End Class

Related examples in the same category

1.	Reflection Information for Integer Class
2.	Fill Reflection Data into ListView
3.	Use Reflection to create Class instance and call method
4.	Get Method information and invoke Method using Reflection API
5.	Get Method Information
6.	Get Class Member and Property Information from base and inherited Class
7.	Reflection: display the member of Form Class
8.	Reflector Utilities
9.	The AssemblyCopyrightAttribute sets the Copyright field on the Version tab.
10.	The AssemblyDescriptionAttribute sets the Comment item.
11.	The AssemblyCompanyAttribute sets the Company item
12.	The AssemblyProductAttribute sets the Product Name item
13.	Define the assembly's only module. For a single-file assembly, the module name is the assembly name.
14.	The AssemblyTitleAttribute sets the Description field on the General tab and the Version tab of the Windows file properties dialog.

Define Attributes and Use Reflection to get its value : Reflection « Development « VB.Net

Related examples in the same category