تعلم معنا: البرمجة بلغة بيسك المرئي ( Visual Basic (3

الرياض@نت  خالد بن محمد المسيهيج

تعلمنا في الدرس السابق كيفية استخدام بعض الوظائف والأدوات، وقد تعمدت أن تكون بدايتنا مع الرياضيات لأنها الحاجز الأعلى في نظر الكثيرين فإذا استسهلها المستخدم بدت كل العمليات الأخرى سهلة، فتعلمنا كيف نجري عملية الضرب وبنفس الطريقة يمكننا أن نجري العمليات الأخرى كالطرح والقسمة، لكن الجمع يختلف لأنه يتعامل مع العملية على أنها صف فإذا كتبت قانون الجمع بهذه الصورة :
Text3.text = Text1.text + Text2.text
فإن القيم التي يتم إدخالها في خانة Text1 و Text2 ستظهر النتيجة على أن الخانة الأولى آحاد والثانية عشرات بمعنى أنه إذا جمعت  + 3 2ستظهر لك النتيجة   .23.ويكون المخرج من هذه المشكلة بتعديل صيغة القانون ليصبح :
Text3.text = Val(Text1.text) + Val(Text2.text)
وسنتعرف في هذا اللقاء على كيفية إجراء عمليات مركبة، بأن نجري عمليات تعتمد على نتائج عمليات سابقة.
لنفترض أن عندنا ثلاثة مبالغ ونريد أن نجمعها ونحسب الزكاة الواجبة عليها كيف نكتب برنامجاً يجري هذه العمليات المركبة؟
علينا أن نعرف أولاً كيفية تعامل البرنامج مع حساب الأولويات وهذا يعني أن تكون الخطوة الأولى هي التخطيط للبرنامج، فنصيغ القانون العام لهذه المسألة :
(س + ص + ع) * ((÷41)÷10)
و بعد التبسيط يصبح القانون (س+ص+ع) *  0.
025الآن نضع الأدوات زر الأمر (Command1) ثم نضع ثلاثة صناديق نصوص بحيث Text1 تمثل (س) ، و Text2 تمثل (ص) و Text3 تمثل (ع) .. ثم نضع ملصق (Label) نسميه (Zakah) لتظهر به نتيجة العملية ثم ننقر نقراً مزدوجاً على زر Command1 الذي غيرنا مسماه من خاصية (Caption) إلى (احسب الآن) فيفتح لنا خانة كتابة الكود فيصبح القانون بالكود على النحو المبين بالصورة رقم (1) .
وبالمناسبة الأقواس مهمة جداً حيث يحدد بها أولويات الحساب، فالبرنامج لا يقرأ ما تريد أن تفعله ما لم تتعامل معه بمنطق رياضي سليم، ويلاحظ أن الضرب يرمز له بالنجمة (*)، كما أن القسمة يرمز لها بالشرطة المائلة (/) .
وحتى لا يكون البرنامج أصم لا يفهم منه المستخدم أي شيء يجب أن نعرف متغيراتنا للمستخدم بأن نضع ثلاث ملصقات (Label1, Label2, Label3) ونغير أسماءها بحسب المتغيرات لدينا لتصلح على التوالي (س،ص،ع) ونحتاج إلى ملصق رابع ليكون دليل الناتج (الزكاة الواجبة) وبعد الانتهاء منها نقوم بتشغيل البرنامج (شكل 2) .
يمكن الحصول على الملفات المصدرية للبرنامج من خلال الوصلة التالية :
www.ma3refah.org/km/03.zip