منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[سؤال] اريد نقل عدد من اعمدة الصفوف بالليست فيو - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [سؤال] اريد نقل عدد من اعمدة الصفوف بالليست فيو (/showthread.php?tid=161)



اريد نقل عدد من اعمدة الصفوف بالليست فيو - mazen55 - 19-09-13

سالت قبل ذالك عن نقل وجمع عدد من الصفوف واجابني ابو رائد واخي  سوريتي


كود :
 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

       For i = 1 To 3

           ' ListView1.Items(i) تعني نسخة من Clone

           Me.ListView2.Items.Add(Me.ListView1.Items(i).Clone)

       Next



   End Sub



End Class





ولكن الكود ينقل كل الصفوف  كيف انقل SUB ITEM

يعني انقل 10 صفوف بالعمود الثاني باليست فيو 1  الي العمود الثالث باليست فيو 2


RE: اريد نقل عدد من اعمدة الصفوف باليست فيو - Sajad - 19-09-13

السلام عليكم

تفضل اخي العزيز

كود :
Private Sub Button1_Click(sender As System.Object, e As EventArgs) Handles Button1.Click
       Dim item As ListViewItem
       For i = 0 To ListView1.Items.Count - 1
           item = New ListViewItem()
           item.SubItems.Add(ListView1.Items(i).SubItems(1))
           ListView2.Items.Add(item)
       Next
   End Sub



RE: اريد نقل عدد من اعمدة الصفوف باليست فيو - mazen55 - 20-09-13

انا هتعبك معايا شوية اخي سجاد انا دية باءذن في اخر المشاكل في اليست فيو وهو طلبي كلا تي

انا عندي ارقام مثلاباليست فيو1   اريد نقلها باليست فيو 2
1
2
3
سبت
4
5
6
حد
كيف انقلهم الي ليست فيو اخر كالاتي  السبت عمود مستقل   الاحد عمود مستقل

السبت العمود الاول   الاحد العمود الثاني باليست فيو 2
1                         4
3                         5
 4                        6


RE: اريد نقل عدد من اعمدة الصفوف باليست فيو - Sajad - 20-09-13

السلام عليكم


تفضل اخي العزيز الكود بعد التعديل:


كود :
Private Sub Button1_Click(sender As System.Object, e As EventArgs) Handles Button1.Click
       Dim item As ListViewItem
       For i = 0 To ListView1.Items.Count - 1
           item = New ListViewItem()
           item.Text = ListView1.Items(i).SubItems(0).Text
           item.SubItems.Add(ListView1.Items(i).SubItems(1))
           ListView2.Items.Add(item)
       Next
   End Sub

باعتبار السبت اول عمود و الاحد ثاني عمود وباعتبار الاعمدة مضافة مسبقا



RE: اريد نقل عدد من اعمدة الصفوف باليست فيو - mazen55 - 20-09-13

مشكور جدا اخي سجاد علي ردك ومتبعتك معايا ولكن الكود ينقل 2 عمود من ليست فيو 1 الي ليست فيو 2 وهذا جيد ولكن مااريدة غير ذاللك

انا اريد الاتي نقل من عمود 1 وهو الثاني باليست فيو الاول الي عمودين باليست فيو الثاني وليس من عمود الي عمود

عمود 2باليست فيو الاول بة وليكن 20 عنصر اريد نقل من 0 الي 7 للعمود الاول باليست فيو 2
عمود 2 باليست فيو الاول بة وليكن 20 عنصر اريد نقل من 8 الي 15 للعمود الثالث باليست فيو 2
عمود 2 باليست فيو الاول بة وليكن 20 عنصر اريد نقل من 16 الي 20 للعمود الرابع باليست فيو 2

اي نفس العمود باليست فيو الاول
ارجو ان اكون وضحت قصدي وانا تهت في الاكواد

علما باني حاولت بالاكود دية لنقل جزئين من الموضوع بس فشلت الاكواد معي

Dim item As ListViewItem

For i = 0 To 7
For B = 10 To 13
item = New ListViewItem()

item.SubItems.Add(ListView8.Items(i).SubItems(1))
item.SubItems.Add(ListView8.Items(B).SubItems(1))
ListView2.Items.Add(item)

Next

Next


RE: اريد نقل عدد من اعمدة الصفوف باليست فيو - Sajad - 20-09-13

اخي العزيز

انا اعطيتك الطريقة

فكل ما عليك هو أن تفهم الكود وتطبقه حسب ماتريد

الاكواد مجربة, انا لا اضع كود او مثال الا وقد جربته




RE: اريد نقل عدد من اعمدة الصفوف باليست فيو - mazen55 - 20-09-13

انا عارف الاكواد مجربة وشغالة 100 *100 اريد تعديل بسيط اذا سمحت اخي سجاد واتمني اني مكنش بتقل عليك

كود :
Private Sub Button1_Click(sender As System.Object, e As EventArgs) Handles Button1.Click

       Dim item As ListViewItem

       For i = 0 To ListView1.Items.Count - 1

           item = New ListViewItem()

           item.Text = ListView1.Items(i).SubItems(0).Text

           item.SubItems.Add(ListView1.Items(i).SubItems(1))

           ListView2.Items.Add(item)

تعديل اليست فيو 2 لعمود انا احددة فقط

       Next

   End Sub

الطلب هو نفس الكود ولكن اريد تحديد العمود الذي سيرسل لة البيانات في اليست فيو 2  لانة بيرسل لعمود مشابة للاول  هذا اخر طلب مني