Reflection VB.Net

Imports System
Imports System.Reflection
Module Module1
    Sub Main()
        Dim a As [Assembly] = System.Reflection.Assembly.GetExecutingAssembly()
        Dim an As AssemblyName
        For Each an In a.GetReferencedAssemblies()
            Console.WriteLine(an.Name)
            Console.WriteLine(an.Version)
            Console.WriteLine(an.CultureInfo.Name)
            Console.WriteLine(BitConverter.ToString(an.GetPublicKeyToken))
        Next
    End Sub
End Module