المساعد الشخصي الرقمي

مشاهدة النسخة كاملة : 09 - الجملة الشرطية ( If ....... Then ....... Else )



GeeK4aRaB
22-08-2007, 09:50 PM
عندما تواجهك عدد من الخيارات لا بد أن تتخذ قرارك بالاختيار منها لكن بناءً للشروط التي تتوافق مع رغبتك أو الموصفات التي تحددها، درسنا هذا اليوم ينصب على اتخاذ القرارات وفقاً لقاعدة (إذا.. إذن.. وإلا)، ونعبر عنها بالجملة البرمجية(If .....Then .... Else).

مثال:
نريد أن ننشئ برنامجاً يحسب الزكاة لأي مبلغ، لكن.. (بشرط) بلوغ النصاب، فتكون صيغة البرنامج:
(إذا) كان المبلغ أكبر من 65ريالا.. (إذن) احسب الزكاة.. (وإلا) قم بإنهاء البرنامج.. ثم نضع نهاية الشرط.
والزكاة = المبلغ * نسبة الزكاة (وهي ربع العشر) .

التطبيق:
نقوم بإنشاء مشروع جديد بنافذة جديدة من فيجوال بيسك ونضع بها مربع نص ونضع أمامه ملصق (Label1) نكتب فيه المبلغ، ثم نضع ملصقا تعريفيا (Label2) ونكتب فيه (مقدار الزكاة) وملصقا ثالثا نسميه (Zakah) والتسمية كما أسلفنا هي أول الخصائص الواقعة يمين النافذة والمسماة Name وهي تختلف عن خاصية السمة Caption التي تقوم بعرض التسمية للمستخدم، فالأولى هي التي يتعامل بها البرنامج، وبعد إضافة الأدوات السابقة نضيف زرا لتنفيذ البرنامج .
http://www.geek4arab.com/vb/images/imgcache/notfound.gif
ثم نقوم بالنقر المزدوج على الزر الذي أسميناه (حساب) لتفتح لنا نافذة تسجيل الأكواد حيث يكون الكود كالظاهر بالصورة (1) .
نلاحظ أنه في نهاية الكود أغلقنا الشرط بكتابة End If .
http://www.geek4arab.com/vb/images/imgcache/notfound.gif
وبعد ذلك نقوم باختبار البرنامج سنجد أنه يخرج عند أي مبلغ يساوي أو يقل عن 65 ريالا، أما إذا أدخلنا مبلغ 66 ريالا فما فوق سيقوم بحساب الزكاة كما يظهر لنا في الصورة رقم (2). وأدوات الترجيح الرياضية التي تستخدم في البرمجة هي: (=) للمساواة ، و (<) أصغر من ، (<) أكبر من ، (<=) أكبر من أو يساوي (>=) أصغر من أو يساوي ، وأخيراً (<>) بمعنى لا يساوي.
____________________

سرحان
08-07-2009, 04:23 PM
أريد برمجة اب ت ث الخ إلى 12345 الخ بحيث لو كتب شخص أسم فعلى طول يتحول ذلك الاسم إلى حروف

the best
09-07-2009, 11:08 PM
اتوقع على السوش ستيتمن اخي بتنحل مشكلتك

محمود010
03-03-2010, 09:16 PM
ارجو رفع الصور من جديد لو سمحت

http://file7azm.info/do.php?img=807