Imports System
Imports System.Reflection
Public class Example
Public Sub m_Public()
End Sub
Friend Sub m_Friend()
End Sub
Protected Sub m_Protected()
End Sub
Protected Friend Sub m_Protected_Friend()
End Sub
Public Shared Sub Main()
For Each m As MethodBase In GetType(Example).GetMethods( _
BindingFlags.Instance Or BindingFlags.NonPublic Or BindingFlags.Public)
If Left(m.Name, 1) = "m"
Console.WriteLine(m.Name)
Console.WriteLine(m.IsPublic)
Console.WriteLine(m.IsAssembly)
Console.WriteLine(m.IsFamily)
Console.WriteLine(m.IsFamilyOrAssembly)
Console.WriteLine(m.IsFamilyAndAssembly)
End If
Next
End Sub
End Class