زياد ناجى
22-05-2011, 01:50 PM
انا مش فاهم اوامر التكرار خالص
بليز اى مستر يفهمهالى بس زى ما بيقولى بالبلدى
بليز اى مستر يفهمهالى بس زى ما بيقولى بالبلدى
|
مشاهدة النسخة كاملة : يبليز لازم افهمها ضرووووووووووورى زياد ناجى 22-05-2011, 01:50 PM انا مش فاهم اوامر التكرار خالص بليز اى مستر يفهمهالى بس زى ما بيقولى بالبلدى حسام صبرى 22-05-2011, 02:24 PM انا مش فاهم اوامر التكرار خالص بليز اى مستر يفهمهالى بس زى ما بيقولى بالبلدى بص ياعزيزى الموضوع سهل جدا تعال تنفق ان انت كل يوم مفروض تروح المدرسة صح وتيجى كمان من المدرسة كل يوم المفروض تعمل كده لحد لما يتحقق شرط معين وهو الحصول على الاجازة هو ده المقصود بالاوامر التكرار مجموعة الاوامر التى تؤدى الى تكرار تنفيذ امر معين ( مرواحك الى المددرسة ) حتى يتحقق شرط معين ( وهو حصولك على الاجازة ) عندها يتوقف التكرار . وكل اوامر التكرار ملغية بالاستناء الامر for .................. next وهو امر يستخدم لتكرار تنفيذ امر معين عدد من المرات حتى يتحقق الشرط وعندها يتوقف عن التكرار . الصغة العامة للامر for ................. next for counter= start to end (step increment) statement 1 statement2 next طبعا انت مش فاهم حاجة هفهمك متخفش الموضوع موضوع فهم وليس حفظ for كلمة تستخدم لبداية التكرار next كلمة تستخدم برافو للنهاية التكرار counter متغير حسابى او رقمى يستخدم لمعرفة عدد مرات التكرار step increment امر اختيارى يعبر عن مقدار الزيادة بالنسبة للتكرار ولو مش موجود يتم التكرار بمقدار واحد ندى مثال علشان تفهم صلى على النبى :- for I=2TO6 step2 for هنا تستخدم لى (قول برافو عليك) للبداية التكرار I هى العداد (counter) المتغير الحسابى 2 ( برافوا ) هى القيمة الابتدائية 6 هى القيمة النهائية step هى مقدار الزيادة فى المسالة وتزيد هنا بمقدار 2 لان فيه رقم 2 بجوار كلمة step الموضوع سهل خلاص :- تعالى بقى ياعزيزى نحسب عدد مرات التكرار فى المثال السابق ده :-for I=2TO6 step2 لابد نعرف حاجة كمان مهمة وهى متى يتوقف التكرار :- يتوقف التكرار عندما تكون القيمة الابتدائية اكبر من القيمة النهائية وعندها يتوقف التكرار ويتم تنفيذ اول امر بعد كلمة Next . ومتى يستمر التكرار :- يستمر التكرار عندما تكون القيمة الابتداية اضغر من اوتساوى القيمة النهائية وعندها يستمر التكرار ويتم تكرار الجمل التى بين كلمة FORوكلمة NEXT مش هقدر اشرح اكثر من كده علشان تفهم اوعدك ان انا اكمل بس بشرط تفهم دول وبعدين نكمل باقى الشرح بالتوفيق ليكى ولكل اصحابك Ahmed_Barakat96 22-05-2011, 02:31 PM ألف شكر يا مستر وياريت if مع الادوات بتاعتها الي متلغتش shasah 22-05-2011, 02:46 PM جزاك الله خيرا حسام صبرى 22-05-2011, 02:51 PM ألف شكر يا مستر وياريت if مع الادوات بتاعتها الي متلغتش حاضر بصى ياعزيزى IF تستخدم مع الادولت radio butten ومع الاداة check box كلام سهل خالص شوف انت الاول اهلوى ولازملاكاوى لو انت متابع كورة وبتدخل على مواقع سعات تلاقى موقع عامل احصائية بيقول مثلا مين الى هيفوز بالدورى وكاتب كده الاهلى وتحته الزمالك وتحته الاسماعيلى انت لو اهلوى هتختار الاهلى ولو زملاكاوى هتختار الزمالك ولو اسمعلاوى اختار الاسماعيلى صح طيب سوال هنا حد ينفع يختار اختيارين يعنى يختار الاهلى ويختار الزمالك لا طبعا مش هينفع هو اختيار واحد فقط هو ده معنى الاداة radio butten شوف الموضوع سهل ازاى اذا تعريف الاداة radio butten هي أداة تتيح للمستخدم مجموعة من البدائل واختيار بديل واحد فقط اما check box أداة تتيح للمستخدم مجموعة من البدائل واختيار اى عدد منهم مثال عليه لو انت مثلا طلب منك ان تقول رايك فى المدرسة بتعتك وكانت الاختيارات (جميلة نظيفة ممتميزة افضل المدارس فيها احسن طلاب ) انت لو طلب منك ان تختار من الاختيارات السابقة ممكن تختار جميلة وممكن نختار جميلة وممتميزة وكمان نظيفة هو ده معنى check box mr metoo 22-05-2011, 06:11 PM الادوات ملغيه وده علشان تفهم اكثر ربنا يوفقك أمثلة قم بطباعة الأعداد من 1 إلى 5 باستخدام for…………..next تصميم الواجهة كما سبق في المثال السابق ولكن كتابة الكود بالشكل Dim x as integer For x= 1 to 5 Msgbox(x) Next for………..next تلاحظ الفرق في كتابة الكود بواسطة الأمر مثال : قم بطباعة الأعداد الفردية من 1 إلى 5 Dim x as integer For x = 1 to 5 step 2 Msgbox(x) Next قم بطباعة الأعداد الفردية من 5 إلى 1 Dim x as integer For x = 5 to 1 step -2 Msgbox(x) Next لاحظ الفرق في جملة for في البرنامجين السابقين وماذا تستنتج قم بجمع الأعداد من 1 إلى 10 Dim x , sum as integer Sum=0 For x = 1 to 10 sum=sum +x Next Label1.text=sum حيث label1 هي الأداة التي سيظهر فيه الناتج على الفورم ملاحظة لماذا لا نضع الجملة Label1.text=sum قبل next الإجابة لأننا نريد إظهار المجموع الكلى مرة واحدة ولا نريد إظهار جمع كل تكرار ملحوظة : فى الخطوة sum=0 ممكن متكتبش لاننا فى السطر الاول قيمة المتغيرين x , sum الابتدائية تساوى صفر كما اوضحنا سابقاً حسام صبرى 22-05-2011, 09:22 PM الادوات ملغيه وده علشان تفهم اكثر ربنا يوفقك أمثلة قم بطباعة الأعداد من 1 إلى 5 باستخدام for…………..next تصميم الواجهة كما سبق في المثال السابق ولكن كتابة الكود بالشكل Dim x as integer For x= 1 to 5 Msgbox(x) Next for………..next تلاحظ الفرق في كتابة الكود بواسطة الأمر مثال : قم بطباعة الأعداد الفردية من 1 إلى 5 Dim x as integer For x = 1 to 5 step 2 Msgbox(x) Next قم بطباعة الأعداد الفردية من 5 إلى 1 Dim x as integer For x = 5 to 1 step -2 Msgbox(x) Next لاحظ الفرق في جملة for في البرنامجين السابقين وماذا تستنتج قم بجمع الأعداد من 1 إلى 10 Dim x , sum as integer Sum=0 For x = 1 to 10 sum=sum +x Next Label1.text=sum حيث label1 هي الأداة التي سيظهر فيه الناتج على الفورم ملاحظة لماذا لا نضع الجملة Label1.text=sum قبل next الإجابة لأننا نريد إظهار المجموع الكلى مرة واحدة ولا نريد إظهار جمع كل تكرار ملحوظة : فى الخطوة sum=0 ممكن متكتبش لاننا فى السطر الاول قيمة المتغيرين x , sum الابتدائية تساوى صفر كما اوضحنا سابقاً group box فقط هى الى اثرائى زياد ناجى 22-05-2011, 10:02 PM جزاك الله خيرا بجد ربنا يجعله فى ميزان حسنات حضرتك حسام صبرى 23-05-2011, 10:30 AM جزاك الله خيرا بجد ربنا يجعله فى ميزان حسنات حضرتك اللهم امين وبالتوفيق ليك ولكل الطلاب |