![]() |
ممكن بعض الامثلة :
ممكن بعض الامثلة على do while ----------loop و for-----------next
وكيفية التحويل بينهما . واذا جائت فى الامتحان فما سيكون شكلها, |
اقتباس:
وبالتالى التحويل بينهم غير مقرر أما for…………..next أمثلة قم بطباعة الأعداد من 1 إلى 5 باستخدام for…………..next تصميم الواجهة كما سبق في المثال السابق ولكن كتابة الكود بالشكل Dim x as integer For x= 1 to 5 Msgbox(x) Next مثال : قم بطباعة الأعداد الفردية من 1 إلى 5 Dim x as integer قم بطباعة الأعداد الفردية من 5 إلى 1 For x = 1 to 5 step 2 Msgbox(x) Next Dim x as integer For x = 5 to 1 step -2 Msgbox(x) Next قم بجمع الأعداد من 1 إلى 10 Dim x , sum as integer Sum=0 For x = 1 to 10 sum=sum +x Next Label1.text=sum Dim x as integer لو فيه اى سؤال اتفضلFor x = 0 to 10 step 2 Msgbox(x) next |
اولا شكرا على الرد السريع .وعندى طلب اخير فى بعض المسائل بيحط فيها قيم ويطلبها تانى شكل اللى فى كتاب المدرسة صـــ124ــــ
اخر حاجة السؤال اهه قم بتتبع مجموعة الاوامر موضحا قيمة كل متغير فى كل مرة يتغير فيها: x=4.5 for i=0 to 7 step 3 x=x*2 next اهه ياريت توضحه وياريت كمان واحد شكلة واكون شاكر جدا ليك. |
اقتباس:
x=4.5 نبدأ التكرار لما تكون 1- i=0 x=(4.5*2)=9 2- i=3 x=9*2=18 3- i=6 x=18*2=36 |
شكراً
|
جزانا واياك
|
جزاك الله خيرا
|
جميع الأوقات بتوقيت GMT +2. الساعة الآن 07:06 AM. |
Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.