الجملة الشرطية ( If ....... Then ....... Else )


تستخدم الجملة الشرطية IF ELSE لفحص الشرط واتخاذ قرار بناء على هذا الشرط
والجملة الشرطية تفحص البيانات التي تستخدم المعاملات المنطقية (...,not,and,or) أو الشرطية (>,<,=,<>,<=,>=)


تركيب الجملة :
   
then    الشرط الذي تريد اختباره    if 
الاوامر التي تريد تنفيذها عند تحقق الشرط
else
الاوامر التي تريد تنفيذها عند عدم تحقق الشرط
end if



وعندما تريد فحص أكثر من شرط في نفس الوقت يمكنك استخدام elseif

then    الشرط الذي تريد اختباره    if 
الاوامر التي تريد تنفيذها عند تحقق الشرط
elseif
الاوامر التي تريد تنفيذها عند  تحقق الشرط
elseif
الاوامر التي تريد تنفيذها عند  تحقق الشرط
.........
.........
else
الاوامر التي تريد تنفيذها عند عدم تحقق أي شرط من الشروط السابقة
end if


مثال :

If  totalMarks >= 80 Then
("MsgBox("Got Higher First Class 
ElseIf  totalMarks >= 60 Then
("MsgBox("Got First Class 
ElseIf  totalMarks >= 40 Then
("MsgBox("Just pass only
Else
("MsgBox("Failed
End If

No comments :

Post a Comment

جميع الحقوق محفوظة لمدونة الفيجوال بيسك