السلام عليكم
أنا عملت برنامج به listview
ولكن لما أضعها في boucle أتصادف مع خطأ بالنظام نصه كالتالي
InvalidArgument=La valeur '0' n'est pas valide pour 'index'.
الكود هو التالي
Dim totale As Double = 0
For i = 0 To i < Me.ListView1.Items.Count - 1
totale += Me.ListView1.Items(i).SubItems(5).Text
Next
Me.Label10.Text = totale
تحياتي الخالصة
مرحباً أخي الكريم .
هذه المشكلة مشهورة لأن أغلبية المبتدئين يشملون العمود الأول في العد :
هل لديك 7 أعمدة في الـ ListView ؟
إذا الجواب بلا وعدد الأعمدة هو ( 6 ) فعليك القيام بالتالي
Dim Total As Double = 0
For Each LVI As ListViewItem In ListView1.Items
Total += Double.Parse( LVI.SubITems( 4 ) )
Next LVI
كما تلاحظ أن العمود الأول لم يتم حسبانة أو عده و بالنسبة للـ SubItems فهي تعامل معاملة المصفوفات الإفتراضية أي تبدأ العد من الصفر
تحياني .
BasharVS .
تم تعديل هذه المشاركة بواسطة Bashar Rabat في 14 ديسمبر 2008 في 21:56
The important thing is not so much
that every child should be taught,
as that every child should be given the wish to learn.