Public Sub ListPrivates()
        For Each mi As MethodInfo In GetType(Module1).GetMethods( _
          BindingFlags.NonPublic + BindingFlags.Static)
            Debug.WriteLine(mi.Name)
        Next
    End Sub

________
Alle Angaben ohne Gewähr. Keine Haftung für Vorschläge, Tipps oder sonstige Hilfe, falls es schiefgeht, nur Zeit verschwendet oder man sonst nicht zufrieden ist