Future Tank X-1
زيزوومى محترف
غير متصل
من فضلك قم بتحديث الصفحة لمشاهدة المحتوى المخفي
تابع
سلسلة أوامر الدوران
اصنع حلقة أوامر
إعداد : Ashalshaikh
خامسا :: أمر لطيب ظريف :d: For .. To
الأمر جميل جدا ,, ينفذ شيء معين بعدد معين ,,
ملاحظة :: أمر For له قسمان واحد مختص للتعامل مع Array والثاني مع هو الآن معنا ,,
أمرنا على الصيغة التالية ::
كود:[COLOR=blue]For[/COLOR] [COLOR=darkred]<variable>[/COLOR] = [COLOR=purple]<start>[/COLOR] [COLOR=blue]To[/COLOR] [COLOR=purple]<stop>[/COLOR] [COLOR=red][[/COLOR][COLOR=blue]Step[/COLOR] [COLOR=purple]<stepval>[/COLOR][COLOR=red]][/COLOR]
كود:[CENTER][B][FONT=Times New Roman] [COLOR=navy]statements[/COLOR][/FONT][/B] [CENTER][B][FONT=Times New Roman][COLOR=navy] ...[/COLOR][/FONT][/B] [B][FONT=Times New Roman][COLOR=blue]Next[/COLOR][/FONT][/B][/CENTER]
بسيط جدا ,, لا تخافون من شكله طويل![]()
حيث ::
<variable> أي متغير
<start> نقطة البداية (( رقم))
<stop> نقطة النهاية (( رقم ))
<stepval> مقدار الزيادة (( رقم ))
statements أي أوامر تريدها ,,
لا تخافون رح نمشي شوي شوي ,,
بسم الله ,,
كالعادة العد من 1 إلى 5كود:[CENTER][B][FONT=Times New Roman][COLOR=blue]For[/COLOR] [COLOR=darkred]$x[/COLOR] = 1 [COLOR=blue]To[/COLOR] 5[/FONT][/B] [B][FONT=Times New Roman] [COLOR=navy]Msgbox[/COLOR][COLOR=royalblue] (0,"",[COLOR=darkred]$x[/COLOR])[/COLOR][/FONT][/B] [B][FONT=Times New Roman][COLOR=blue]Next[/COLOR][/FONT][/B][/CENTER]
لاحظ أن المتغير $x يزيد في كل دورة حتى يصل إلى نقطة النهاية ويخرج ,, :d:
طيب الآن رح نستعبط :d:نبي نعم من 8 إلى 15
:d:كود:[CENTER][B][FONT=Times New Roman][COLOR=blue]For[/COLOR] [COLOR=darkred]$x[/COLOR] = 8[COLOR=blue] To[/COLOR] 15[/FONT][/B] [B][FONT=Times New Roman] [COLOR=navy]Msgbox[/COLOR] [COLOR=royalblue](0,"",[COLOR=darkred]$x[/COLOR])[/COLOR][/FONT][/B] [B][FONT=Times New Roman][COLOR=blue]Next[/COLOR][/FONT][/B][/CENTER]
الآن هل توضح !!!
طيب عشان زيادة للتوضيح لأنه أمر مهم جدا ورح يفيد في التطبيقات الكبيرة !! :d:
ناخذ الآن مثال لـ ExitLoop ومثال لـ ContinueLoop وانتوا إفهموا المغزى ,, :d:
مو كل شي يجي سهل:d::hh:
كود:[CENTER][B][FONT=Times New Roman][COLOR=blue]For[/COLOR][COLOR=darkred] $x[/COLOR] = [COLOR=navy]8[/COLOR] [COLOR=blue]To[/COLOR] 15[/FONT][/B] [B][FONT=Times New Roman] [COLOR=blue]If[/COLOR][COLOR=darkred] $x [/COLOR]= [COLOR=navy]10 [/COLOR][COLOR=blue]Then ContinueLoop [/COLOR][/FONT][/B] [B][FONT=Times New Roman] [COLOR=navy]Msgbox [COLOR=royalblue](0,"",[COLOR=darkred]$x[/COLOR])[/COLOR][/COLOR][/FONT][/B] [B][FONT=Times New Roman][COLOR=blue]Next[/COLOR][/FONT][/B][/CENTER]
كود:[CENTER][B][FONT=Times New Roman][COLOR=blue]For[/COLOR] [COLOR=darkred]$x[/COLOR] = 8 [COLOR=blue]To[/COLOR] 15[/FONT][/B] [B][FONT=Times New Roman] [COLOR=blue]If[/COLOR] [COLOR=darkred]$x[/COLOR] = 10 [COLOR=blue]Then[/COLOR] [COLOR=blue]ExitLoop [/COLOR][/FONT][/B] [B][FONT=Times New Roman] [COLOR=navy]Msgbox[/COLOR][COLOR=royalblue] (0,"",[COLOR=darkred]$x[/COLOR])[/COLOR][/FONT][/B] [B][FONT=Times New Roman][COLOR=blue]Next[/COLOR][/FONT][/B][/CENTER]
الآن نتطور شوي ,,
ناخذ الصيغة الطويييييييلة ,,
وهي بسيطة بإذن الله ,,
نفس المثال السابق العد
كود:[CENTER][B][FONT=Times New Roman][COLOR=blue]For[/COLOR] [COLOR=darkred]$x[/COLOR] = [COLOR=purple]1[/COLOR] [COLOR=blue]To[/COLOR] [COLOR=purple]5[/COLOR] [COLOR=blue]Step[/COLOR] [COLOR=purple]1[/COLOR][/FONT][/B] [B][FONT=Times New Roman] [COLOR=navy]Msgbox[/COLOR] [COLOR=royalblue]([COLOR=purple]0[/COLOR],"",[COLOR=darkred]$x[/COLOR])[/COLOR][/FONT][/B] [B][FONT=Times New Roman][COLOR=blue]Next[/COLOR][/FONT][/B][/CENTER]
يزيد واحد في كل دوران ,,
وهذا هو الإفتراضي
الآن نريده يعد بس يزيد اثنين اثنين !!! :d:
كود:[CENTER][B][FONT=Times New Roman][COLOR=blue]For[/COLOR] [COLOR=darkred]$x[/COLOR] = [COLOR=purple]1[/COLOR] [COLOR=blue]To[/COLOR] [COLOR=purple]10 [/COLOR][COLOR=blue]Step[/COLOR] [COLOR=purple]2[/COLOR][/FONT][/B] [B][FONT=Times New Roman] [COLOR=navy]Msgbox[/COLOR] [COLOR=royalblue]([COLOR=purple]0[/COLOR],"",[COLOR=darkred]$x[/COLOR])[/COLOR][/FONT][/B] [B][FONT=Times New Roman][COLOR=blue]Next[/COLOR][/FONT][/B][/CENTER]
طيب الآن كالعادة ,, نستعبط ههههههههههههه:d:
نريد نرجع ورى ,, يعني ينقص واحد واحد ,,
بس تذكر البداية أكبر من النهاية :d:
كود:[CENTER][B][FONT=Times New Roman][COLOR=blue]For[/COLOR] [COLOR=darkred]$x[/COLOR] =[COLOR=purple]10[COLOR=blue] To [/COLOR]1[/COLOR] [COLOR=blue]Step[/COLOR] [COLOR=purple]-1[/COLOR][/FONT][/B] [B][FONT=Times New Roman] [COLOR=navy]Msgbox[/COLOR] [COLOR=red]([COLOR=purple]0[/COLOR],[COLOR=royalblue]""[/COLOR],[COLOR=darkred]$x[/COLOR])[/COLOR][/FONT][/B] [B][FONT=Times New Roman][COLOR=blue]Next[/COLOR][/FONT][/B][/CENTER]
نكمل استعباط ,,
هههههههههههههه
الآن ما نبيه يزيد 1 نبيه يزيد نص :d:كود:[CENTER][B][FONT=Times New Roman][COLOR=blue]For [COLOR=darkred]$x[/COLOR] =[COLOR=purple]1[/COLOR] To [COLOR=purple]10[/COLOR] Step [COLOR=purple].5[/COLOR][/COLOR][/FONT][/B] [B][FONT=Times New Roman] [COLOR=navy]Msgbox [COLOR=blue]([COLOR=purple]0[/COLOR],[COLOR=royalblue]""[/COLOR],[COLOR=darkred]$x[/COLOR])[/COLOR][/COLOR][/FONT][/B] [B][FONT=Times New Roman][COLOR=blue]Next[/COLOR][/FONT][/B][/CENTER]
طبعا الأمر أهم مما تتخيل ,, الأمر كبييييييييييييييييييييير في عمله ,, وسوف نرى ذلك في التطبيقات التي سوف نراها لاحقا ,,
وعذرا على التأخير ,,
أمامي اختبارات ,, !!! :d:
بارك الله فيكم ,,
إبدااااااااااااااااااااااااااااااااااااااااااااااااااااااع
جاري الاضافه في الفهرس ,,
^^^^^
يتطنز:hh:
______________________
جزاك الله الف خير امر رائع ومفيد
[/CENTER]
