ListeDoppelteSpalten.ForEach(AddressOf LeereSpaltenRaus)
ListeDoppelteSpalten.ForEach(AddressOf InListBoxEintragen)
 
 
Private Sub LeereSpaltenRaus(ByVal s As String)
        If s = String.Empty Then ListeDoppelteSpalten.Remove(s)
    End Sub
 
Private Sub InListBoxEintragen(ByVal E As String)
        If E <> String.Empty Then ListBoxDoppelteSpalten.Items.Add(E)
    End Sub

----
Meine Komponenten sind:
Visual Studio 2008 (Standard) SP 1
Windows 7 SP 1