السلام عليكم ورحمة الله وبركاتة ،،،
اقدم لكم اليوم درس خفيف عن العبارات الشرطية
العبارات الشرطية
تقوم هذه العبارات بتنفيذ التعليمات الموجودة بين بدايتها ونهايتها وذلك اذا كانت نتيجة العملية الشرطية هي "صح"
العبارة if…then ….ent if
يكون الشكل الاساسي للعبارة الشرطية في VBA كما يلي :
كود بلغة HTML:
IF blnconditiona [=true] then
العبارات التي ستنفذ في حال تحقيق الشرط الاول
[else[if blnconditiona [=true] then] ]
العبارات التي ستنفذ في حال عدم تحقق الشرط الاول وتحقق الشرط الثاني
End if
_________________________________________________________________________________________
يكون العنصر =true في العبارة السابقة اختياريا ولا يتم عادة تضمينة في العبارات الشرطية ذلك لانة اذا تحقق الشرط blnconditiona فهو true واذا لم يتحقق فهو False>
بامكانك اضافة شرط اخر باستخدام الكلمة الاساسية else...lf ويجب ان يكون الشرط محققا حتى يتم تنفيذ العبارات التي يجب تنفيذها في حال كون الشرط الاول غير محقق لاحظ ايضا انه لاحاجة لوضع فراغ بين else و if . تكون عبارة elself على الشكل التالي
كود بلغة HTML:
If blnconditiona then
العبارات التي ستنفذ في حال تحقيق الشرط الاول
Else
If blnconditiona then
العبارات التي ستنفذ في حال عدم تحقق الشرط الاول وتحقق الشرط الثاني
End if
____________________________________________________________________________________________
تسمى عبارات if..then..if المتضمنة في عبارات مرات if…end…if اخرى بالعبارات الشرطية المتداخلة علما انة لايوجد حد لعدد مرات تداخل العبارات
نلاحظ العبارات الشرطية السابقة وجود مسافات بادئة لاسطر محتويات العبارة الشرطية وتستخدم هذه المسافات البادئة لتسهيل قراءة وتتبع العبارات الشرطية علما انة يتم استخدام المفتاح tap عادة لوضع مثل هذه المسافات البادئة .
على سبيل المثال استخدم التعليمات التالية :
كود:
If asc (strchar) > 63 and asc (strchar) < 91 then
Strchartype = "uppercase letter"
Elself asc (strchar)>96 and asc (strchar )<123 then
Strghactype = "lowercase"
Else
strcharType = "not a letter"
end IF
__________________________________________________________________________________________
انتهى الشرح
والسلام عليكم ورحمه الله وبركاته