الاختيار من اكثر من Listview

حياك الله

ضع هذا الكود في الزر :

        Dim St(1) As String
        Dim ListItem As ListViewItem
        St(0) = ListView1.SelectedItems(0).Text
        St(1) = ListView2.SelectedItems(0).Text
        ListItem = New ListViewItem(St)
        ListView3.Items.Add(ListItem)
        ListView1.SelectedItems(0).Remove()
        ListView2.SelectedItems(0).Remove()

بالتوفيق

جزاك الله خيرا يا اخي , هو يعمل بشكل جيد ولكن لي استفسار ارجو بان يكون بسيط , اريد عند اختياري قيمة من الليست الاول والثاني بان تظلل , اى عندما اختار من الليست الاول فانه يظلل الحقل الذي اريد , اريد ان يبقى هذا الظل فى الليست الاول الى ان اختاره ما يقابله فى الليست الثاني ثم عند ضغطي على الزر ينتقل الاثنان , كما فى الصور التى ارفقتها

ولك جزيل الشكر

وجزاك بالمثل ..

ضع قيمة False لخاصية HideSelection وستؤدي المطلوب .

عاشق للبرمجة كتب:

وجزاك بالمثل ..

ضع قيمة False لخاصية HideSelection وستؤدي المطلوب .

اخي , اذا اردت ان افعل العكس , ان ارجع القيم من الليست الثالثة الى الليست الاولى والثانية , فكيف يكون ذلك

tatatab كتب:

اخي , اذا اردت ان افعل العكس , ان ارجع القيم من الليست الثالثة الى الليست الاولى والثانية , فكيف يكون ذلك

اخي , اذا اردت ان افعل العكس , ان ارجع القيم من الليست الثالثة الى الليست الاولى والثانية , فكيف يكون ذلك

تفضل أخي

 ListView1.Items.Add(ListView3.SelectedItems.Item(0).SubItems(0).Text)
        ListView2.Items.Add(ListView3.SelectedItems.Item(0).SubItems(1).Text)
        ListView3.SelectedItems.Item(0).Remove()

عاشق للبرمجة كتب:

تفضل أخي

 ListView1.Items.Add(ListView3.SelectedItems.Item(0).SubItems(0).Text)
        ListView2.Items.Add(ListView3.SelectedItems.Item(0).SubItems(1).Text)
        ListView3.SelectedItems.Item(0).Remove()

بارك الله فيك يا اخي على المجهود والمساعدة