منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب الأقسام التعليمية - المنتدى القديم قسم دورات المنتدى دورة تعليم البرمجة باستخدام VB.net, الفصل (7):- اوامر التكرار والدوران ( شرح مفصل )
تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
ادوات الموضوع
الفصل (7):- اوامر التكرار والدوران ( شرح مفصل )
B3dak Hbebe غير متصل
عضو فعال
*
المشاركات : 33
المواضيع 3
الإنتساب : Sep 2012
السمعة : 0
الشكر: 1
تم شكره 1 مرات في 1 مشاركات
#2
23-09-12, 12:30 PM
هذا مثال بسيط على الكونسول وجمل التكرار والمصفوفات والمتغيرات
سننشأ مصفوفة جديدة لنضع فيها درحات الطلاب
وسنخرج منها ايضاً
مجموع الدرجات جميعها
العلامة الاكبر من بين العلامات
متوسط العلامات اي عدد الطلاب قمسة الدرجات ..
كود :
[align=left][color=#000000][COLOR=#0000BB]Dim marks[/color][color=#007700]([/color][color=#0000BB]4[/color][color=#007700]) As [/color][COLOR=#0000BB]Integer
Dim sum [/COLOR][color=#007700]As [/color][COLOR=#0000BB]Double
Dim avg [/COLOR][color=#007700]As [/color][COLOR=#0000BB]Double
Dim big [/COLOR][color=#007700]As [/color][COLOR=#0000BB]Double
sum [/COLOR][color=#007700]= [/color][COLOR=#0000BB]0
avg [/COLOR][color=#007700]= [/color][COLOR=#0000BB]0
big [/COLOR][color=#007700]= [/color][COLOR=#0000BB]0
[/COLOR][color=#007700]For [/color][color=#0000BB]x [/color][color=#007700]= [/color][COLOR=#0000BB]0 To 4
marks[/COLOR][color=#007700]([/color][color=#0000BB]x[/color][color=#007700]) = [/color][color=#0000BB]InputBox[/color][color=#007700]([/color][color=#DD0000]"ادخل الدرجة هنا "[/color][COLOR=#007700])
[/COLOR][color=#0000BB]sum [/color][color=#007700]= [/color][color=#0000BB]sum [/color][color=#007700]+ [/color][color=#0000BB]marks[/color][color=#007700]([/color][color=#0000BB]x[/color][COLOR=#007700])
[/COLOR][COLOR=#0000BB]Next
[/COLOR][color=#007700]For [/color][color=#0000BB]s [/color][color=#007700]= [/color][COLOR=#0000BB]0 To 4
Console[/COLOR][color=#007700].[/color][color=#0000BB]WriteLine[/color][color=#007700]([/color][color=#DD0000]"number of marks " [/color][color=#007700]& [/color][color=#0000BB]s [/color][color=#007700]& [/color][color=#DD0000]"  = " [/color][color=#007700]& [/color][color=#0000BB]marks[/color][color=#007700]([/color][color=#0000BB]s[/color][COLOR=#007700]))
[/COLOR][COLOR=#0000BB]Next
Console[/COLOR][color=#007700].[/color][color=#0000BB]WriteLine[/color][color=#007700]([/color][color=#DD0000]"-----------------------------"[/color][COLOR=#007700])
[/COLOR][color=#0000BB]Console[/color][color=#007700].[/color][color=#0000BB]WriteLine[/color][color=#007700]([/color][color=#DD0000]"the sum is  = " [/color][color=#007700]& [/color][color=#0000BB]sum[/color][COLOR=#007700])
[/COLOR][color=#0000BB]avg [/color][color=#007700]= [/color][color=#0000BB]sum [/color][color=#007700]/ [/color][COLOR=#0000BB]5
Console[/COLOR][color=#007700].[/color][color=#0000BB]WriteLine[/color][color=#007700]([/color][color=#DD0000]"-----------------------------"[/color][COLOR=#007700])
[/COLOR][color=#0000BB]Console[/color][color=#007700].[/color][color=#0000BB]WriteLine[/color][color=#007700]([/color][color=#DD0000]"the avg of numbers is  = " [/color][color=#007700]& [/color][color=#0000BB]avg[/color][COLOR=#007700])

For [/COLOR][color=#0000BB]m [/color][color=#007700]= [/color][COLOR=#0000BB]0 To 4
[/COLOR][color=#007700]If [/color][color=#0000BB]marks[/color][color=#007700]([/color][color=#0000BB]m[/color][color=#007700]) > [/color][color=#0000BB]big Then big [/color][color=#007700]= [/color][color=#0000BB]marks[/color][color=#007700]([/color][color=#0000BB]m[/color][COLOR=#007700])
[/COLOR][COLOR=#0000BB]Next
Console[/COLOR][color=#007700].[/color][color=#0000BB]WriteLine[/color][color=#007700]([/color][color=#DD0000]"-----------------------------"[/color][COLOR=#007700])
[/COLOR][color=#0000BB]Console[/color][color=#007700].[/color][color=#0000BB]WriteLine[/color][color=#007700]([/color][color=#DD0000]"the bigger number is  = " [/color][color=#007700]& [/color][color=#0000BB]big[/color][COLOR=#007700])
[/COLOR][color=#0000BB]Console[/color][color=#007700].[/color][color=#0000BB]WriteLine[/color][color=#007700]([/color][color=#DD0000]"-----------------------------"[/color][COLOR=#007700])
[/COLOR][color=#0000BB]Console[/color][color=#007700].[/color][color=#0000BB]ReadKey[/color][COLOR=#007700]()
[/COLOR][/COLOR][/align]
شرح الكود السابق :-

عرفنا مصفوفة من نوع رقم وفيها خمس مناطق للتخزين
لانها تبدأ من الصفر وتنتهي عند الاربعة
يعني 0 1 2 3 4

السطور التي بعدها هي لتعريف المتغيرات وهي
Sum & avg & big

----------------------

Sum =ليحمل بداخله مجموع الدرجات جميعها
Avg = ليحمل بداخله متوسط الدرجات
Big = ليحمل بداخله اكبر درجة



واسندنا قيمة بدائية لكل من المتغيرات الثلاثة :-

اقتباس:
Sum=0
Avg=0
Big=0
اول جملة تكرار في الكود
عرفنا عداد اسمه x على انه يبدأ من صفر وينتهي عند الاربعة
الان بندأ باسناد القيمة لكل من الغرف الموجودة في المصفوفة marks
بهذا الكود

كود :
[align=left][color=#000000][COLOR=#007700][COLOR=DarkSlateBlue][/color][/COLOR][/COLOR]             [color=#000000] [COLOR=#0000BB]Marks[/color][color=#007700]([/color][color=#0000BB]x[/color][color=#007700])=[/color][color=#0000BB]inputbox[/color][color=#007700]([/color][color=#0000BB]“ادخل الدرجة هنا ”[/color][color=#007700])  [/color][/COLOR]
[/align]
اعتقد الان بدأت توضح الفكرة لماذا وضعنا داخل القويين x
لان x يمثل العداد والعداد سوف يبدأ من الصفر ويسير للوصول إلى الاربعة
كود :
[align=left][COLOR=#000000][COLOR=#0000BB]نفس فهارس المصفوفة   marks
Sum [/COLOR][color=#007700]= [/color][color=#0000BB]sum [/color][color=#007700]+ [/color][color=#0000BB]marks[/color][color=#007700]([/color][color=#0000BB]x[/color][COLOR=#007700])

[/COLOR][/COLOR]
[/align]
الان كبداية.. المتغير قيمته صفر ونحن نقول له
اجمع قيمتك القديمة التي هي صفر مع مجموع الدرجة التي ادخلت من قبل المستتخدم

الان سوف نقوم بكتابة جملة تكرار لتكرار مجموع الدرجات وطباعتها على الكونسول الخاص بنا
كود :
[align=left][color=#000000][COLOR=#007700]For [/color][color=#0000BB]s [/color][color=#007700]= [/color][COLOR=#0000BB]0 To 4
Console[/COLOR][color=#007700].[/color][color=#0000BB]WriteLine[/color][color=#007700]([/color][color=#DD0000]"number of marks " [/color][color=#007700]& [/color][color=#0000BB]s [/color][color=#007700]& [/color][color=#DD0000]"  = " [/color][color=#007700]& [/color][color=#0000BB]marks[/color][color=#007700]([/color][color=#0000BB]s[/color][COLOR=#007700]))
[/COLOR][color=#0000BB]Next[/color][/COLOR]
[/align]
عرفنا عداد جديد للتكرار اسمه s
ويحمل بداخله قيمة من صفر إلى 4
----------------------------------------
وسيقوم بإعطاء هذا الكود
كود :
[align=left]             [color=#000000] [COLOR=#0000BB]Console[/color][color=#007700].[/color][color=#0000BB]WriteLine[/color][color=#007700]([/color][color=#DD0000]"number of marks " [/color][color=#007700]& [/color][color=#0000BB]s [/color][color=#007700]& [/color][color=#DD0000]"  = " [/color][color=#007700]& [/color][color=#0000BB]marks[/color][color=#007700]([/color][color=#0000BB]s[/color][color=#007700]))  [/color][/COLOR]
[/align]
وهو يعني ان الكونسول سوف يكتب لك ان رقم الدرجة الاولى هي = الدرجة التي ادخلها المستخدم
وهو يعني ان الكونسول سوف يكتب لك ان رقم الدرجة الثانية هي = الدرجة التي ادخلها المستخدم
وهو يعني ان الكونسول سوف يكتب لك ان رقم الدرجة الثالثة هي = الدرجة التي ادخلها المستخدم
وهكذا .......
--------------------------------------------------------------------------------------------

طبعاً من الامور البديهية في هذ النوع
استخراج المتوسط لهذه الدرجات
يمكننا ذلك من خلال الكود التالي

كود :
[align=left]avg = sum / 5
[/align]

لماذا الخمسة ؟؟؟؟ الخمسة مجموع القيم الموجودة في المصفوقة

وهي التي تبدأ من الصفر وتنتهي بالاربعة

*&*&*&*&*&*&*&*&*&*&*&*&*&*&*&*&*&*&


وجملة التكرار الثالثة

هي لتحديد الدرجة الاكبر من خلال الدرجات المدخلة جميعها
اي عندما تكون
الدرجة اكبر من ال درجة التي قبلها سوف يحفظها في المتغير

وسنقوم استدعاء المتغير من خلال الكود التالي :-
كود :
[align=left]             [color=#000000] [COLOR=#0000BB]Console[/color][color=#007700].[/color][color=#0000BB]WriteLine[/color][color=#007700]([/color][color=#DD0000]"the bigger number is  = " [/color][color=#007700]& [/color][color=#0000BB]big[/color][COLOR=#007700])  
[/COLOR][/COLOR][/align]


طبعاً لا ننسى الكود الذي لايعمل البرنامج بدونه وهو الـ

كود :
[color=#000000][COLOR=#0000BB]Console[/color][color=#007700].[/color][color=#0000BB]readkey[/color][color=#007700]()[/color][/COLOR]

والكود كله موضح في هذه الصورة البسيطة

أبلغكم تحياتنا

Lo2i و Mohammed Asaad
انتظروا الدرس القادم



البحث
الرد }}}
تم الشكر بواسطة:


الردود في هذا الموضوع
الفصل (7):- اوامر التكرار والدوران ( شرح مفصل ) - بواسطة B3dak Hbebe_mybb_import4575 - 23-09-12, 12:30 PM

المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  الفصل(8): الدوال والاجراءات B3dak Hbebe 3 20,711 15-08-18, 09:20 AM
آخر رد: nagoma
  الفصل(9):مدخل الى الفئاتClasses - الجزء الأول B3dak Hbebe 5 4,739 30-05-17, 01:09 PM
آخر رد: ali hussein
  الفصل(5):صنع القرار...الجزء الأول-الجمل الشرطية Omar Mekkawy 4 4,449 10-08-13, 05:39 PM
آخر رد: Omar Mekkawy
  الفصل(3): التركيبات أنواعها واستخداماتها Omar Mekkawy 4 4,526 10-08-13, 05:32 PM
آخر رد: Omar Mekkawy
  الفصل (1) : الفيجوال بيسك دوت نت (لمحة تعريفية) Omar Mekkawy 2 3,800 27-07-13, 02:39 PM
آخر رد: green.grass52
  الفصل (0) : دورة تعلم معنا فيجوال بيسك دوت نيت Omar Mekkawy 7 5,134 18-07-13, 06:29 PM
آخر رد: el@nsary
  الفصل(16): مدخل لمسارات التنفيذ Threading B3dak Hbebe 3 4,120 27-04-13, 10:58 AM
آخر رد: خليل اسماعيل
  الفصل(15): الفئتان Stack و Queue B3dak Hbebe 2 3,501 27-04-13, 09:20 AM
آخر رد: خليل اسماعيل
  الفصل(12): Oop بالتفصيل...الجزء الثاني B3dak Hbebe 3 4,270 27-04-13, 09:16 AM
آخر رد: خليل اسماعيل
  الفصل (11) :oop بالتفصيل ..الجزء الاول Easy4ever 3 3,887 27-04-13, 09:08 AM
آخر رد: خليل اسماعيل

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم