[VB.NET] Alle Typen einer Assembly auslesen

Es kommt immer wieder einmal vor, dass man eine Auflistung aller Typen einer Assembly haben möchte. Händisch raussuchen war gestern. Es gibt da einen durchaus eleganteren Weg:

Sub Irgendwas()
        Dim typelist As Type() = GetTypesInNamespace(Assembly.GetExecutingAssembly(), "Dein_Namespace")
        For i As Integer = 0 To typelist.Length - 1
            Debug.WriteLine(typelist(i).Name.ToString)
        Next
End Sub

Private Function GetTypesInNamespace(oAssembly As Assembly, sNamespace As String) As Type()
        Return oAssembly.GetTypes().Where(Function(t) [String].Equals(t.Namespace,       sNamespace, StringComparison.Ordinal)).ToArray()
End Function