بارك الله فيك أستاذي العزيز
ولكن لدى استفسار عندما تكون i بـ 6 الا يحقق الشرط هذه الأمر
Else if ( I mod 3=0) then
Msgbox( I*I )
وعليه يكون الناتج 36
(Y) و (Sum) سؤال آخر تتبع الكود التالى ثم اكتب قيمة المتغيرات
Sum=0
Y=1
DoWhile Sum<0
Sum=Sum + Y
Y=Y+1
Loop
فهل يكون الشرط خاطئ وهل تكون قيمة
Sum =0 و Y=1
أرجو التوضيح
سؤال آخر اكتب ناتج الكود التالى
N=20
i=6
For i = 6 To 20 Step 2
N = N + 6
Next