حاجة مهمة

[noorehan]

بجد طب مش ممكن يعدوا الاتنين
اصل شيت الوزارة ص 9 مش عامل كده
يعنى فيه مسألة زيها اهى

Dim count , Sum as Integer
Count = 1
Sum =0
Do While Count <= 10
Sum = sum + count
Count = count + 3
Loop
MsgBox

و المطلوب قيمة المتغير Sum

انا عارفة ان المطلوب مختلف بس لو مشينا بنظرية 5 و 2 هيكون الناتج غير اللى الوزارة عاملاه
عموما انا عايزة اعرف حل المسألة دى و بس
و شكرا