Type.Module Property

Property Value

Type: System.Reflection.Module
The module in which the current Type is defined.

Namespace MyNamespace
   Class [MyClass]
   End Class '[MyClass]
End Namespace 'MyNamespace
Public Class Example
   Public Shared Sub Demo(ByVal outputBlock As System.Windows.Controls.TextBlock)
      Try
         Dim myType As Type = GetType(MyNamespace.MyClass)
         outputBlock.Text += String.Format(ControlChars.NewLine + "Printing the details of {0}." + ControlChars.NewLine, myType) & vbCrLf
         ' Get the namespace of the class Example.
         outputBlock.Text += String.Format("Namespace: {0}.", myType.Namespace) & vbCrLf
         ' Get the name of the module.
         outputBlock.Text += String.Format("Module: {0}.", myType.Module) & vbCrLf
         ' Get the fully qualified common language runtime namespace.
         outputBlock.Text += String.Format("Fully qualified type: {0}.", myType.ToString()) & vbCrLf
      Catch e As Exception
         outputBlock.Text &= "Exception: " + e.Message.ToString() & vbCrLf
      End Try
   End Sub 'Main
End Class 'Type_ToString_3

using System;
namespace MyNamespace
{
   class MyClass
   {
   }
}
public class Example
{
   public static void Demo(System.Windows.Controls.TextBlock outputBlock)
   {
      try
      {
         Type myType = typeof(MyNamespace.MyClass);
         outputBlock.Text += String.Format("\nPrinting the details of {0}.\n", myType) + "\n";
         // Get the namespace of the class Example.
         outputBlock.Text += String.Format("Namespace: {0}.", myType.Namespace) + "\n";
         // Get the name of the module.
         outputBlock.Text += String.Format("Module: {0}.", myType.Module) + "\n";
         // Get the fully qualified common language runtime namespace.
         outputBlock.Text += String.Format("Fully qualified type: {0}.", myType.ToString()) + "\n";
      }
      catch (Exception e)
      {
         outputBlock.Text += "Exception: " + e.Message + "\n";
      }
   }
}