-
مرحبا ...
هذا البرنامج يوضح طريقة عمل If Then في الفيجوال بيسك ..
اولا نبدأ بمشروع جديد .... ونختار من الأدوات زر Command واثنين Text
ونضعهم على الفورم بطريقة مرتبة ....
نضغط على Text ضغطة واحدة ليتم تحديدة ونذهب للخصائص الموجودة على اليمين
ونمسح مابجانب عبارة Text وأيضا نقوم بذلك لـ Text الأخر..... اذا لم تكن الخصائص موجودة يمكن اظهارها عن طريق زر الفأرة الأيمن .....
سوف يكون Text الأول لكتابة الأرقام والثاني لأظهار النتيجة...
دبل كليك على زر Command ونكتب هذا الكود بداخلة ...
<BLOCKQUOTE><font size="1" face=" Arial">code:</font><HR><pre>
If Text1.Text < 10 Then
"جيد" = Text2.Text
ElseIf Text1.Text > 10 And Text1.Text < 20 Then
"جيد جدا" = Text2.Text
Else
"ممتاز" = Text2.Text
End If
[/code]
طبعا نكتب العدد في Text1 وعند الضغط على زر Command تظهر النتيجة على Text2
في السطر الأول if وهي أداة الشرط وتشترط هنا أن Text1 وهو الأول يكون أصغر من العدد 10 ....اذا كان العدد المدخل كذلك فتقوم Then باظهار النتيجة وهي
طباعة العبارة جيد في Text2 ....
اذا كان العدد ليس كذلك ننتقل الى Elseif وتشترط هنا أن يكون العدد أكبر من 10 و أصغر من 20 .....
اذا كان كذلك فتعمل Then على طباعة العبارة جيد جدا.....
اذا كان ليس كذلك فنتقل الى Else وهي تعني أي شي غير الشرطين السابقين ....
يعني أي عدد أكبر من 20 .. فتكون النتيجة طباعة العبارة ممتاز في Text2
في الأخير End if وهي لأغلاق نهاية الشرط if
أرجو ان أكون قد وفقت في ايصال المعلومة 
------------------
ســـامر الليـــــــل
[b]<small><small>[ تم تعديل الموضوع بواسطة Vampire يوم 29-01-2000]
-
-
مشكور على هذا الدرس وبصراحة أستفدنا من الكود كثير في ايضاح الدرس
------------------
أن التقنيات ليس ثابتة أو منتهية والتلميذ الذي يتعلم مجموعة من المهارات الميكانيكية فقط سرعان مايجد نفسه متخلفا في عالم متغير أما الشخص الذي يتعلم الأساسيات وطرق الإبداع الفكري فإنه يستطيع أن ينمو ويساير الزمن
-
أختي نيسان .... شكرا لسؤالك
عاد اليوم مختبر فيجوال والنتيجة ممتازة الحمدلله
أخي حمود (معليش أحب أختصر)
قلتلي انك راح ترسلي رسالة على البريد ... ماوصلني شي لحد الحين
عسى ماشر ؟؟؟
------------------
ســـامر الليـــــــل
-
أخوي Vampire سأرسل لك رسالة على هذا البريد
V2000@flashmail.com
أنتظر مني رسالة اليوم إن شاء الله - لاني لما كتبت الرد هنا انقطع خط الهاتف لمدة أربع أيام . ولم أستطع أرسال الرسالة ولا كتابة الردود
------------------
أن التقنيات ليس ثابتة أو منتهية والتلميذ الذي يتعلم مجموعة من المهارات الميكانيكية فقط سرعان مايجد نفسه متخلفا في عالم متغير أما الشخص الذي يتعلم الأساسيات وطرق الإبداع الفكري فإنه يستطيع أن ينمو ويساير الزمن
ضوابط المشاركة
- لا تستطيع إضافة مواضيع جديدة
- لا تستطيع الرد على المواضيع
- لا تستطيع إرفاق ملفات
- لا تستطيع تعديل مشاركاتك
-
قوانين المنتدى
أضف موقعك هنا |
اضافة محتوى فريد لموقعك
