انا بدرس فيجول بيسك
ارجو المساعدة فى هذه المسائلة
for i=0 to 5
x(i) =inputbox ()i
if x(i) mod 2=0
Msgbox("the number is E")i
Eles
Msgbox("the number is 0")i
End if
Next
اريد تحويله باستخدام DO while loop
شكراااااااااااااااااااا
انا بدرس فيجول بيسك
ارجو المساعدة فى هذه المسائلة
for i=0 to 5
x(i) =inputbox ()i
if x(i) mod 2=0
Msgbox("the number is E")i
Eles
Msgbox("the number is 0")i
End if
Next
اريد تحويله باستخدام DO while loop
شكراااااااااااااااااااا
انا اسف الموضوع اتكرر اكثر من مرة دوست غلط اسف جدا
ارجو المساعدة لو سمحت
تفضل اخي
dim i as integer
i=0
DO while i <=5
x(i)=inputbox (i)
if x(i) mod 2=0 then
Msgbox("the number is E")
Eles
Msgbox("the number is 0")
End if
Loop
تم تعديل هذه المشاركة بواسطة ورق خسرانه في 29 أبريل 2013 في 11:43
الف شكررررررررررررررررررررررررررررررررررررررررررررررررررررررررررررررررررررررررررررررررررررررررررررررررررررررررررر جزاك الله خيرا