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

مشاهدة النسخة كاملة : الجمل الشرطية وأشياء أخري عن VB.Net


Hesham
07 - 01 - 2010, 16:04
السلام عليكم الأن لنري الجمل الشرطية المهمة
أولاً وبالطبع جملة If...Then
تتيح لنا هذه الجملة أختبار شرط معين وإذا كان الشرط صحيح يقوم البرنامج بتنفيذ أمر أو مجموعة من الأمور وإذا لم يحدث يمكننا أن نجعل البرنامج لا يقوم بتنفيذ أي أمر أو بإمكاننا أن نجعله يقوم بتنفيذ أمر أو مجموعة من الأمور أو حتي يمكننا أن نجعله يقوم باختبار شرط وإذا تحقق هذا الشرط يمكننا....إلخ
لها معاملات كثيرة للمقارنة نحتاج إليها عند إختبار شرط من أهمها


= يساوي
<> لا يساوي
< أكبر من
> أصغر من
=< أكبر من أو يساوي
=> أصغر من أو يساوي
And و
Not ليس
Or أو


نقوم بكتابة If ثم الشرط المراد إختباره ثم Then
إذا كانت الجملة في سطر واحد لا يهم أن ننهيها ب End If
وعلينا أن نكتب الأمر المراد تنفيذه عند تحقق الشرط بعد Then
لكن عند كتابة الجملة في سطر واحد يجب أن يكون هناك أمر واحد فقط للتنفيذ بعد Then
ثم يمكننا أن نكتب Else ثم أمر يتم تنفيذه عند عدم تحقق الشرط
لكن أيضاً يجب أن يكون أمراً واحداً فقط


وإذا كنا نريد تنفيذ مجموعة من الأوامر بعد Then فعلينا أن نكتب كل أمر في سطر وحيد بعد Then
ويجب أن ننهي هذا ب End If
ويمكننا أستخدام Else If التي تتيح لنا أختبار الشرط الذي بعد If وإذا لم يتحقق يتم أختبار الشرط الذي بعد Else If
وإذا أستعملنا Else
يتم إختبار كل الشروط وإذا لم يتحقق أي شرط يتم تنفيذ الأوامر التي بعد Else

لاحظ أن
لا يمكن كتابة Else If بعد Else
إذا تحقق أي شرط يتم تنفيذ ما بعد End If

إنتظروا المزيد

Hesham
07 - 01 - 2010, 16:16
السلام عليكم ورحمة الله وبركاته
ثانياً
جملة Select Case
وهي تتيح لنا أختبار قيمة معينة واحتمالات متعددة بصورة مبسطة عن جملة If...Then
نقوم بكتابة Select Case
ثم نكتب القيمة المراد إختبارها
ثم نضغط Enter
ثم كتابة Case
ثم الأحتمال
ثم نضغط Enter
ثم نكتب الأوامر التي نريد تنفيذها عند حدوث هذا الأحتمال
لاحظ
يجب إنهاء الجملة ب End Select
يمكن إختبار أكثر إحتمال بنفس الطريقة
إنتظروا المزيد

Hesham
07 - 01 - 2010, 16:22
السلام عليكم ورحمة الله وبركاته
ثالثاً
جملة GoTo
هذه الجملة تتيح لنا القفز إلي أي سطر قادم أو سابق في هذا الإجراء بمجرد كتابة كلمة GoTo ثم أسم السطر مثلاً A B C أو أي حرف
وعند السطر المراد القفز إليه يتم كتابة أسم السطر الذي كتبناه في البداية يتبعه :

والنهاية

Hesham
13 - 02 - 2011, 02:08
لاحظ أن في جملة Goto يجب أن يكون القفز داخل الإجراء

يمكن أستخدام Case Is >0

أو Case Else لتنفيذه عند عدم تحقق أي شرط أياكو تعملوا :crash: