اقتباس:
المشاركة الأصلية كتبت بواسطة almsry
ممكن حد يحللى الورطه دى
صمم برنامج يعرض الارقام الفرديه بدءا من رقم يدخله المستخدم حتى رقم يدخله المستخدم لاحظ انه يمكن ان يدخله المستخدم رقم البدايه زوجى او صفر
|
Dim a , b , c as integer
If a mod b = 0 then
For c = a to b step2
Msgbox ( c )
Next
End if
بس ده لو زوجى