12-01-22, 06:04 PM
شكرا جزيلا استاذ ابراهيم على مرورك الرشيق والسلس في الشرح من خلال كودك الذي أرسلته ومما فهمت عدلت الكود على النحو التالي وزبط بشكل رائع
Dim x, sum as integer
For x = 0 to listbox2.items.count(x)
Next
Textbox6.text= sum
Dim x, sum as integer
For x = 0 to listbox2.items.count(x)
Next
Textbox6.text= sum
اللهم اني قد نذرت نفسي لمساعدت الاخرين فوفقني وكن لي معين
جاهز لمساعدة اي حد يحتاج لمساعدتي
طبيب اعشق البرمجة .
