[Anas Mahmoud]

اضافة :

كود :

       Dim AddedItem As String = ComboBox1.SelectedItem
       If AddedItem Is Nothing Then Return
       ListBox1.Items.Add(AddedItem)

مسح المحدد :

كود :

       Dim RemovedItem = ListBox1.SelectedItem
       If RemovedItem Is Nothing Then Return
       ListBox1.Items.Remove(RemovedItem)

مسح الكل :

كود :

       ListBox1.Items.Clear()