[superwoofer]

اريد التعديل علي هذا الكود
   Dim i As Integer

        For i = 0 To checkListbox2.CheckedItems.Count - 1
            checkListbox2.SelectedIndex(i) = Listbox1.SelectedIndex(i)
        Next
بحيث ان item 0 في Listbox1 عند الوقوف عليه يقوم بعمل check هلي item رقم 0 في checkListbox2