هلا باعضاء منتدانا
اليوم ان شاء الله مع الدرس الخامس .. نبأ على بركة الله
.:. الدرس الخامس .:.
IF
الIf عبارة عن كود يكتب لوضع شرط لمجموعة من الاوامر
طريقة كتابتها
then ( الشرط ) if
الاوامر التي لا تنفذ الى بتحقق الشرط
End if
هذه هي ابسط صورة لكتابة الIF
ماذا نستخدم لوضع الشرط ؟
> .... اصغر من
< .... اكبر من
= .... يساوي
=> .... اصغر من او يساوي
=< .... اكبر من او يساوي
<> .... لا يساوي
مثال
if ( x > y ) then
z = x + y
end if
اوكي .. اذا كنت ابي اضع لكل امر شرط خاص فيه ولا ينفذ الا امر واحد
وهو اول امر يتحقق الشرط عنده
نستخدم الif مع الelse if
كالاتي
if ( x > y ) then
z = x + y
else if ( x < y ) then
z = x - y
end if
انزين .. انا الحين حطيت كل الشروط الي ابيها لكل الاوامر
فرضا ابي اضع امر يعمله اذا ما تحقق اي شرط من الي الشروط التي سبقت
نستخدم الelse
كالاتي
if ( x > y ) then
z = x + y
else if ( x < y ) then
z = x - y
else
z = 0
end if
هذه هي الثلاث طرق في استخدام الif
هناك طريقة رابعة لكن لن اتطرق لها في هذا الدرس
الان مع برنامج اليوم
وظيفة البرنامج انك ادخل وزنك طولك
وهو يعطيك بعض التعليقات المضحكة :D
ناتي للكود
في البداية عرفنا المتغيرات التالي
km , cm , rslt على انها double
وجعلنا قيمة الcm والkm المستخدم يدخلها
وقيمة الrslt تساوي cm/km
ليش؟
لان مثل ما هو معروف عند اختصاصي التغذية
اذا كنت تبي تطلع انت وزنك مناسب بالنسبة لطولك
تقوم وتقسم الطول بالسانتي على الوزن بالكيلو
كلما كبر الناتج كلما كنت اضعف والعكس صحيح
نرجع للبرنامج
بعد ما طلعنا الrslt كل الي بقى
اني احط تعليق لكل حاله
اولا لمنع الاستعباط والاخطاء من البرنامج قمت وعملت الاتي
If ( rslt >= 6 ) Then
"انت غبي ولا تستعبط انا ما سويت البرنامج حق عبطك" = result.Text
يعني اذا كان الناتج اكبر من او يساوي 6
سوف يكتب الجمله السابقه في الtextbox
لكي محد يكتب
طولي = 300
وزني = 3
بعد هذا الكود الذي يمنع المدخلات الغير منطقية
ناتي الى المنطقي
else if ( rslt >= 4 ) Then
"اكل اخوك الي يمك لا تختفي" = result.text
لو تلاحظون استخدمنا else if
لكي اذا ما مشى الشرط الاول ياتي لهذا الشرط
واذا ما تحقق هذا الشرط ياتي للي بعده
وهكذا
.
.
لين ياتي للelse
وهي لا يوجد فيها اي شرط
فينفذها على طول
مع العلم اذا اي شرط تحقق من اي واحد فيهم
يلغي الذي بعده
بعد تشغيل البرنامج
نفس ما تشوفون
فقط اخذ اول شرط يتحقق
ونفذ الاوامر التي فيه
ولغا ما بعده من شروط
هذا درس اليوم
اتمنى انكم تكونون استفدتوا منه
واي سؤال او استفسار لا تترددو :q:
المفضلات