Mega Code Archive

 

Categories / VB.Net / Reflection

 

Type IsPublic Property tells whether the Type is declared public

Imports System Imports Microsoft.VisualBasic Namespace SystemType     Public Class MyTestClass     End Class      Public Class [MyClass]         Public Shared Sub Main()             Try                 Dim myBool As Boolean = False                 Dim myTestClassInstance As New MyTestClass()                 Dim myType As Type = myTestClassInstance.GetType()                 myBool = myType.IsPublic                 Console.WriteLine(ControlChars.Cr + "Is {0 public? {1}.", myType.FullName, myBool.ToString())             Catch e As Exception                 Console.WriteLine(ControlChars.Cr + "An exception occurred: {0}", e.Message.ToString())             End Try         End Sub      End Class  End Namespace