1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11:
Ввозы System.Text Тусклое lb1 как список (шнура) = ListBox1.Items.Cast (предмета) (). Выберите (функции s.ToString ()).ToList () Затемните lb2 как список (шнура) = ListBox2.Items.Cast (предмета) (). Выберите (функции s.ToString ()).ToList () Затемните lbDiff как список (шнура) = lb1.Except (lb2) .ToList () Тусклое stringDiff как новое StringBuilder () lbDiff.ForEach (функции stringDiff.Append (s & vbCrLf)) MessageBox.Show (stringDiff.ToString ())