1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11:
Importe System.Text Schwaches lb1 als Liste (der Schnur) = ListBox1.Items.Cast (des Gegenstandes) (). Vorwählen (Funktionen s.ToString ()).ToList () Verdunkeln lb2 als Liste (der Schnur) = ListBox2.Items.Cast (des Gegenstandes) (). Vorwählen (Funktionen s.ToString ()).ToList () Verdunkeln lbDiff als Liste (der Schnur) = lb1.Except (lb2) .ToList () Schwaches stringDiff als neues StringBuilder () lbDiff.ForEach (Funktionen stringDiff.Append (s u. vbCrLf)) MessageBox.Show (stringDiff.ToString ())