تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] جمع قيم داخل listbox
#1
Wink 
اخواني الأعزاء لا انكر فظلكم عليا في تعلمي لغة vb.n
واود ان اسئل سؤال كيف يمكن جمع قيم داخل lisbox غير مرتبطه باداتاجريد وإظهارها تلقائيا او عن طريق بوتن في تكست بوكس .

علمني احد المطورين في هذا المنتدى شى رائع جدا ان البرمجه ليست كود فقط وانما تفكير في حل المشكله فشكرا له من اعماق روحي كان اسمه ابراهيم ايبو سلام من الله عليه .

اللهم اني قد نذرت نفسي لمساعدت الاخرين فوفقني وكن لي معين
جاهز لمساعدة اي حد يحتاج لمساعدتي
طبيب اعشق البرمجة . 
الرد }}}
تم الشكر بواسطة: ابراهيم ايبو
#2
السلام عليكم ورحمة الله وبركاته
اخي الكريم رضوان بارك الله بك على اخذك بالنصيحة وانار الله طريقك الى النجاح
بالنسبة لسؤالك تفضل هذا الكود واهم نقطة فيه هو تحويل عناصر الليست بوكس الى integer حتى يتم الجمع وان كان فيها قيم لها فاصلة عشرية غير نوع البيانات الى Double مع تعريف المتغير AA ايضا Double وكذلك دالة التحويل الى CDbl
كود :
 Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
       Dim AA As Integer = 0
       If ListBox1.Items.Count > 0 Then
           For i As Integer = 0 To ListBox1.Items.Count - 1
               AA += CInt(ListBox1.Items(i))
           Next
           TextBox1.Text = AA
       Else
           TextBox1.Text = 0
       End If
   End Sub
اعمل الخير وأجرك لا تنتظره فالله خير من إليك يرده
البرمجة ليست مجرد كود بل هي منهج تفكير منطقي لحل المشكلات







الرد }}}
#3
بعد إذن الأستاذ إبراهيم

أنا عندي كود مختصر قليلا ، ويعطي نفس النتيجة ،

وهذا هو ..  

كود :
       Dim myNumber As Integer = 0

       For I = myNumber To ListBox1.Items.Count - 1
           myNumber = myNumber + ListBox1.Items(I)
       Next

       TextBox1.Text = myNumber
الرد }}}
#4
شكرا جزيلا استاذ ابراهيم على مرورك الرشيق والسلس في الشرح من خلال كودك الذي أرسلته ومما فهمت عدلت الكود على النحو التالي وزبط بشكل رائع
Dim x, sum as integer
For x = 0 to listbox2.items.count(x)
Next
Textbox6.text= sum

اللهم اني قد نذرت نفسي لمساعدت الاخرين فوفقني وكن لي معين
جاهز لمساعدة اي حد يحتاج لمساعدتي
طبيب اعشق البرمجة . 
الرد }}}
تم الشكر بواسطة: معاند الحظ


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] كيفية انشاء فورم داخل مشروعى عاصم النجار 2 304 05-01-24, 12:36 AM
آخر رد: HALIM ELEULMA
  حماية عمود داخل ورقة الاكسل العيدروس 3 190 05-01-24, 12:21 AM
آخر رد: HALIM ELEULMA
  [VB.NET] listbox تلوين عدد من هذه الأسماء mervandz 3 420 18-11-23, 01:35 AM
آخر رد: sniper2030
Information [VB.NET] حذف كل العناصر التي تاتي بعد عنصر الذي احدده listbox mervandz 3 288 10-11-23, 07:12 PM
آخر رد: justforit
  هل الداتا قراد فيو تسمح بتعدد الاسطر داخل الخلية عند جلب بيانات نصية طويله من قاعدة ب khalidalwdi 3 460 10-11-23, 11:08 AM
آخر رد: khalidalwdi
  يوجد مشكلة عند تحميل البيانات فى كمبوبوكس داخل داتا جريد new_programer 2 473 17-10-23, 06:51 PM
آخر رد: new_programer
  اريد اضافة متغيراخر داخل Listbox1 احتاج تعديل بسيط moh61 0 349 05-08-23, 02:29 PM
آخر رد: moh61
  اريد البحث عن ID داخل ListView من قاعدة بيانات لكل صنف معين moh61 6 696 26-07-23, 05:47 AM
آخر رد: Taha Okla
  اريد تغير حجم ال Panel عند التفيذ من داخل الكود moh61 2 403 23-07-23, 12:22 AM
آخر رد: أبووسم
  مساعدة كتابة التاريخ داخل داتا جريد فيو كريم عبودي 2 523 22-06-23, 12:28 AM
آخر رد: كريم عبودي

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم