Public Class ByFileExtension Implements IComparer(Of String) Dim xExt, yExt As String Dim caseiComp As CaseInsensitiveComparer = _ New
msdn.microsoft.com/de-de/library/dd412070.aspx