24-08-13, 12:00 AM
هل هذا الكود لايؤدي الواجب؟
كود :
Dim S As New List(Of String)
For Each i As String In ListBox1.SelectedItems
S.Add(i.ToString)
Next
ListBox2.Items.AddRange(S.ToArray)
