[amrzezo]

المشاركة الأصلية كتبت بواسطة البنان واو

1. Dim A as Integer = 2 , Sum as Integer

2. Do While A<=10
3. Sum = Sum + A
4. A = A+ 2
5. Loop
6. Msgbox( sum )

لو سمحت تنفع الجملة الثانيه تبقي

11<do while a