'Imports System.Reflection
Using sw As IO.StreamWriter = My.Computer.FileSystem.OpenTextFileWriter("assembly info.txt", False)
Dim asm As Assembly = Me.GetType.Assembly
sw.WriteLine(String.Format("Assembly name {0}", asm.GetName.Name))
For Each t As Type In asm.GetExportedTypes
sw.WriteLine(String.Format("Type name {0}", t.Name))
For Each m As MethodInfo In t.GetMethods
sw.WriteLine(String.Format("Method name {0}", m.Name))
For Each p As ParameterInfo In m.GetParameters
sw.WriteLine(String.Format(" Parameter name {0}, type {1}", p.Name, p.ParameterType.ToString))
Next
Next
For Each p As PropertyInfo In t.GetProperties
sw.WriteLine(String.Format("Property name {0}, type {1}", p.Name, p.PropertyType.ToString))
Next
For Each f As FieldInfo In t.GetFields
sw.WriteLine(String.Format("Field name {0}, type {1}", f.Name, f.FieldType.ToString))
Next
sw.WriteLine()
Next
End Using