+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (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=332)
نقل اعمدة من ليست فيو لاخر - mazen55 - 29-09-13
انا باستخدم اليست فيو بالعمليات الحسابية اريد نقل 2 عمود من ليست فيو 1 الي ليست فيو 2
اريد نقل العمود 2و 6 من ليست فيو 1 الي الاعمدة 4و5 باليست فيو 2
انا ارفقت ملف ورد لما اريد
RE: نقل اعمدة من ليست فيو لاخر - Abdullah0991 - 29-09-13
هذا مثال بسيط:
المثـــــــال
RE: نقل اعمدة من ليست فيو لاخر - mazen55 - 29-09-13
المثال شغال وتمام بس فيةمشكلة
انا اسف اني هتعبك معايا
لما اليست فيو 2 مبيكونش فية بيانات بيظهر ERROR
For index = 0 To ListView1.Items.Count - 1
ListView2.Items(index).SubItems(3).Text = ListView1.Items(index).SubItems(0).Text
ListView2.Items(index).SubItems(4).Text = ListView1.Items(index).SubItems(1).Text
Next
والطبيعي ان اللا عمدة دية فارغةلان البيانات من الاعمدة باليست فيو الاول فما العمل وكيف تكون NULL
ERROR
InvalidArgument=Value of '0' is not valid for 'index'.
Parameter name: index
RE: نقل اعمدة من ليست فيو لاخر - Abdullah0991 - 29-09-13
في هذه الحالة يجب ان يقوم البرنامج بإضافة قيم للعمود الاول ,, ثم نقل البيانات إلى العمود الثاني والثالث
قم بتغيير كود زر النقل ليصبح الكود هكذا:
كود :
For index = 0 To ListView1.Items.Count - 1
ListView2.Items.Add("")
ListView2.Items(index).SubItems.Add(ListView1.Items(index).SubItems(0).Text)
ListView2.Items(index).SubItems.Add(ListView1.Items(index).SubItems(1).Text)
NextRE: نقل اعمدة من ليست فيو لاخر - mazen55 - 30-09-13
مشكور جدا اخي عبد اللة المثال شغال بس في حاجات مش فاهمهة
انا فاهم الكود دة نقل العناصر من العمود الاول ب 1 الي العمود الرابع بليست فيو2
ListView2.Items(index).SubItems(3).Text = ListView1.Items(index).SubItems(0).Text
ولكن ماهذا
ListView2.Items(index).SubItems.Add(ListView1.Items(index).SubItems(0).Text)
اين الاعمدة التي انقل اليها باليست فيو 2 العمود ال3و4و2و1 او اضيف اليها انا تاية في الاكواد دية
يعني كيف احدد الاعمدة التي اريد ان ينتقل اليها البيانات بالكود الثاني
وجزاك اللة خيرا علي الاكواد
RE: نقل اعمدة من ليست فيو لاخر - @@أبورائد@@ - 30-09-13
السلام عليكم ورحمة الله وبركاته
أخي مازن...
أول شيء لازم تعرف من ماذا يتكون الـ ListView
تتكون من عناصر أساسية Items
وكل عنصر أساسي ممكن يحتوي بداخله عناصر أخرى تسمى عناصر فرعية SubItems
اذا كنت تريد إضافة عنصر أساسي للـ ListView تكتب هكذا
كود :
ListView1.Items.Add("عنصر أساسي جديد")واذا كنت تريد إضافة عنصر فرعي لعنصر أساسي لازم نحدد العنصر الأساسي وبعدها نضيف العنصر الفرعي هكذا
كود :
ListView1.Items(3).SubItems.Add("عنصر فرعي جديد للعنصر الأساسي 3")السلام عليكم ورحمة الله وبركاته
RE: نقل اعمدة من ليست فيو لاخر - mazen55 - 30-09-13
مشكور جدا ابو رائد علي المعلومات التي طرحتها ولكن انا اعلم الاضافة وانا فهمت الطريقة للنقل الي عمود احددة
For index = 0 To ListView1.Items.Count - 1
ListView2.Items.Add("") العمود الاول0
ListView2.Items(index).SubItems.Add("")العمود الثاني 1
ListView2.Items(index).SubItems.Add("")العمود الثالث 2
ListView2.Items(index).SubItems.Add(ListView1.Items(index).SubItems(1).Text) الرابع 3
Next
هل لوممكن النقل نفس العمود ل2 ليست فيو استخدم نفس الكود بس حصلت مشكلة صغيرة اني بيضيف لكل اعمدة ليست فيو 3 بالترتيب ااول فالثاني فالثالث وليس لواحد فقط
For index = 0 To ListView1.Items.Count - 1
ListView2.Items.Add("")
ListView2.Items(index).SubItems.Add("")
ListView2.Items(index).SubItems.Add("")
ListView2.Items(index).SubItems.Add(ListView1.Items(index).SubItems(1).Text)
ListView3.Items.Add("")
ListView3.Items(index).SubItems.Add(ListView1.Items(index).SubItems(1).Text)
Next
RE: نقل اعمدة من ليست فيو لاخر - Abdullah0991 - 30-09-13
أظن ان الاخ العزيز ابو رائد ,, اجاب على سؤالك
اذا كان لديك اسئلة اخرى
تفضل !
RE: نقل اعمدة من ليست فيو لاخر - mazen55 - 01-10-13
انا لدي استفسار في نفس الاطار انا حاولت بالكود انقل لليست فيو اخر ولكن لم ينفع لادري لماذا يعني العمود هنقلة من اليست فيو الاول الخاص
بالمبيعات الي اليست فيو الثاني الخاص بالمشتريات الي اليست فيو الثالث الخاص الارباح والخسائر والمخزون
انا كدة قمت بالخطوة الاولي اريد نقلة من ليست فيو 1 الي ليست فيو 2 وليست فيو 3 وهو نفس العمود باليست فيو الاول
حاولت بهذة الخطوة اضافة الي ابداعاتك ولكن حصلت مشكلة انة في اليست فيو الثالث لما اضغط علي الزر اكثر من مرة ينقل العمود الي 2 لست و3
ليست ولكن ينقل الي الاعمدة المجاورة ايضا باليست فيو في 3 يعني لو هنقل الي العمود 2 في اليست 3 ينقل في 2 و3و4و5
كل ضغطة بنقلة لعمود اخر بس شغال مع ليست 2 كويس اوي
For index = 0 To ListView1.Items.Count - 1
ListView2.Items.Add("")
ListView2.Items(index).SubItems.Add("")
ListView2.Items(index).SubItems.Add("")
ListView2.Items(index).SubItems.Add(ListView1.Items(index).SubItems(1).Text)
ListView3.Items.Add("")
ListView3.Items(index).SubItems.Add(ListView1.Items(index).SubItems(1).Text)
Next
انا تعبتك عارف واسف مرة اخري
RE: نقل اعمدة من ليست فيو لاخر - @@أبورائد@@ - 01-10-13
السلام عليكم ورحمة الله وبركاته
في رأيي (وقد أكون مخطأ) أن مسألة نقل البيانات بين الأدوات بهذه الطريقة غير صحيحة ولا تدل على من يتبعها أنه شخص فاهم يعني برمجة بيانات حسابية يترتب عليها أموال، والمفروض القيام بعرض البيانات في كل أداة من قاعدة البيانات حتى لو كان فيها عمليات حسابية.
(وقد أكون مخطأ)
السلام عليكم ورحمة الله وبركاته