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

مشاهدة النسخة كاملة : 15 - استخدام دالة صندوق الإدخال InputBox



GeeK4aRaB
25-08-2007, 09:55 PM
تعرفنا في الدروس الفائتة على كيفية التعامل مع الرسائل والاستفادة منها في اتخاذ القرارات، وبعد أن أنهيناها ننتقل إلى مرحلة جديدة تعد استكمالاً للتفاعل بين المستخدم والبرنامج، لنتعرف على كيفية استخدام صناديق الحوار أو الإدخال، بحيث يظهر مربع حوار يطالب المستخدم بإدخال قيمة معينة يبني عليها البرنامج عملية معينة والدالة التي سنستخدمها لهذا الغرض هي دالة InputBox.

مثال:
نفترض أنك ترغب في عمل برنامج يطلب من المستخدم إدخال اسمه، ومن ثم يظهر له رسالة ترحيبية تتضمن اسمه بحيث إذا أدخل اسم خالد مثلاً تظهر رسالة (مرحباً بك يا خالد) .. وهكذا ....

http://www.geek4arab.com/vb/images/imgcache/notfound.gif

التطبيق:
نستدعي نافذة جديدة Form1 ونضع به زر أمر Command1 وسنتعرف في هذا الدرس أيضاً على طريقة ضبط إعداد مسمى الزر من خلال المنهج البرمجي، فنقوم بالنقر المزدوج على أي مكان فارغ في النافذة Form1 فيظهر لنا مساحة لكتابة الكود الخاص بـ Form1 الحدث Load أي هذا الكود سينفذ بمجرد تحميل النافذة Form1 فنكتب الكود كالظاهر بالصورة رقم (1).

http://www.geek4arab.com/vb/images/imgcache/notfound.gif


ثم ننقر بالماوس نقراً مزدوجاً على زر Command1 لتفتح لنا نافذة البرمجة الخاصة بـ Command1 الحدث Click فنكتب الكود الموضح بالصورة رقم (2).

http://www.geek4arab.com/vb/images/imgcache/notfound.gif

نلاحظ أننا في هذه الخطوة قمنا بالإعلان عن متغير اسمه khalid ثم وضحنا قيمة هذا المتغير حيث سيتكون دالة InputBox كخانة للإدخال ومعها دليل يعرف المستخدم بالقيمة المطلوبة فنقول له (أدخل اسمك من فضلك) ، وخانة العنوان الذي سيظهر في شريط عنوان النافذة العلوي، ثم نضع القيمة الافتراضية التي ستظهر لو لم يكتب المستخدم أي شيء.

التنفيذ :
بمجرد النقر على زر (دخول) يظهر لنا مربع حوار وفيه مساحة كتب بها الجملة الافتراضية (زائرنا الكريم)، وبمجرد كتابة اسم أو الاكتفاء بالجملة الافتراضية سيقوم البرنامج بإضافة ذلك إلى جملة ثابتة كتبت سابقاً (مرحباً بك يا).


اختبار:
اكتب برنامجاً للزكاة بحيث يقوم بعرض مربع حوار (باستخدام الدالة InputBox) يطلب من المستخدم كتابة المبلغ المطلوب حساب الزكاة عنه فإذا كان المبلغ أقل من 56 ريالاً يعرض رسالة يفيده فيها أن المبلغ لم يبلغ النصاب ثم يسأله
عما إذا كان يريد حساب مبلغاً آخراً . إذا علمت أن القانون هو :

الزكاة = المبلغ * 0.025 .

يمنى 2008
16-03-2008, 09:18 AM
الله يعطيكم العافية على الجهود الطيبة التي تبذلوها من أجل إخوانكم

yuldiz
13-08-2008, 03:02 PM
thanks for you.................................:M22:

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