سلسلة تعلم VBScript – الجزء الثاني - الجمل الشرطية - دروس تطوير المواقع والمنتديات

$عقارية المدينة ينتهي في 12\12\1429 هـ$	$عطري الخاص احدث و اجود و افضل و اروع العطورات الفرنسية 23\12\1429 هـ$
$شرفات الورد ينتهي في 17\11\1429 هـ$	$حراج سيارات شراء استبدال بيع جديدة و مستعملة جميع أنواع السيارات ينتهي في 12\5\1430 هـ$	$الحمادين ينتهي في 8\10\1429 هـ$
$خزامى نجد محاورة شعر شعبي ادب لقاءات ديوان الشعراء 25\12\1429هـ$	$جويا تنتهي في 20\11\1429 هـ$
	$دلوعتي ينتهي في 12\12\1429 هـ$

احصائيات سريعة

الرئيسية
اضافة
اتصل بنا
mnu1

اقسام على الموقع

البحث في المواد

اكثر المحتويات زيارة

الدوال في الاكسل (8,263 مشاهده)
ربط قاعدة بيانات أكسس (MS Access) مع برنامج الفيجوال بيسك بطريقة(ODBC) (5,756 مشاهده)
تعريف الفن التشكيلي: (5,190 مشاهده)
الدرس الثالث : بعض تطبيقات الدوال في اكسل (3,931 مشاهده)
تغيير لغة واجهة التطبيق من عربي الى انجليزي وبالعكس لـ Windows-based applications (3,654 مشاهده)
شرح طريقة استعمال الأوتلوك مع بريد الهوتميل (3,637 مشاهده)
أنواع العلاقات وطريقة الربط بين الجداول. (3,599 مشاهده)
تعريف الاستعلام وطريقة عرضه في آكسس، أنواع الاستعلامات، نافذة تحديد الاستعلام! (3,277 مشاهده)
دروس في الأوفيس الأكسس - Access0- (3,084 مشاهده)
الدرس الثاني: بعض الحيل لتسهيل برنامج اكسل (3,061 مشاهده)
اضافه صوت ونص لخلفيه في باور بوينت (2,652 مشاهده)
أنشئ قاعدة بياناتك التي ستستند إليها في تعلم طريقة ربط الجداول والاستعلامات. (2,522 مشاهده)
كيفية حل مشاكل الانترنت اكسبلور Internet Explorer (2,404 مشاهده)
مقدمة عامة حول الاكسل وحيل خاصة بالاكسل (2,369 مشاهده)
الدرس الأول : عمل شريحة في البوربوينت (2,345 مشاهده)
المنظور الفوتوغرافي Perspective Drawing (2,284 مشاهده)
شرح طريقة التجميع Grouping في برنامج الاكسل (2,185 مشاهده)
الدرس الثاني : عمل خلفيات ملونة لشرائح (2,182 مشاهده)
دورة الأكسس: الدرس السادس : منوعات في أكسيس .0--- (2,172 مشاهده)
ما هو المات لاب MATLAB؟ (1,996 مشاهده)
إنشاء موقع ويب جديد0--- (1,962 مشاهده)
تحويل ملف من مايكروسوفت ورد إلى اكروبات (1,930 مشاهده)
التعرف على مكونات الكمبيوتر (1,929 مشاهده)
برنامج Windows Movie Maker لتكوين أفلام (1,926 مشاهده)
ما هو برنامج الاكسل -00 (1,880 مشاهده)

جديد مواد مع عشوائي

التحويل التلقائي للحروف ل- ل- ه إلى اسم الجلالة0---- (1,186 مشاهده)
النسبة المئوية لا تظهر بالخط العربي & الشدة وألف المد في لفظ الجلالة0---النسبة المئوية لا تظهر بالخط العربي & الشدة وألف المد في لفظ الجلالة0--- (765 مشاهده)
ضبط خيارات اللغة فى الـ Microsoft Word0--- (1,001 مشاهده)
استخدام لوحة المفاتيح في الـ Word0---- (1,135 مشاهده)
إضافة كلمة سر إلي ملفات الورد دون استخدام برامج0--- (1,150 مشاهده)
دمج المراسلات0-- (653 مشاهده)
وضع صورة كخلفية للنص0-- (891 مشاهده)
السماح للمستخدمين بتعديل أجزاء من ملف وورد محمي (Word2003)0--- (627 مشاهده)
كتابة الأرقام الكسرية ورموز المعادلات0-- (980 مشاهده)
درس كامل عن الدمج السهل من لوحة المفاتيح ف0-ي برنامج الـ Word (665 مشاهده)
دورة الأكسس: الدرس السادس : منوعات في أكسيس .0--- (2,172 مشاهده)
دورة الأكسيس : الدرس الرابع : العلاقات0---- (1,092 مشاهده)
أساسيات في Access0--0 (897 مشاهده)
تصميم تقرير لطباعة البيانات0---- (875 مشاهده)
تصميم نموذج استعراض البيانات‏0--تصميم نموذج استعراض البيانات‏0-- (788 مشاهده)
تصميم نموذج إدخال‎ ‎البيانات0--- (884 مشاهده)
إنشاء قوائم خاصة باستخدام الماكرو(1)0-- (768 مشاهده)
خطوات إنشاء الماكرو في تذييل النموذج (2)0-- (608 مشاهده)
خطوات إنشاء الماكرو في تذييل النموذج (1)0- (570 مشاهده)
استعلامات SQL في Access - تعديل الجداول وإضافة الحقول0- (835 مشاهده)
استعلامات SQL في Access - تحديث البيانات الجدولية0-- (650 مشاهده)
الاستعلامات الإجرائية -4 (استعلام الحذف)0--- (425 مشاهده)
الاستعلامات الإجرائية -2 (استعلام الإلحاق)0--- (545 مشاهده)
تصميم تقرير لطباعة الإجمالي0--- (518 مشاهده)
استعلامات التحديد Select Query مع أمثله (1)0--- (736 مشاهده)

دروس كمبيوتر وصيانة دروس حاسب دروس مجلة درس نيوك phpnuke الدروس دروس مسنجر MSN - yahoo - Gmail دروس منتديات vBulletin دروس الجوالات والهواتف دروس السي بنل cpanel دروس اكسس access دروس بيونت شوب برو - point shop pro دروس برمجة php - mysql دروس برامج منوعة software دروس ثري دي ماكس 3D max دروس جافا سكريبت JavaScript دروس دريم ويفر DreamWeaver دروس شبكات Networks دروس سويش - swish دروس فلاش - flash دروس فيجوال بيسك Visual Basic دروس فرونت بيج - frontpage دروس فوتوشوب photoshop دروس هكر hacker crack virus > دروس تطوير المواقع والمنتديات > سلسلة تعلم VBScript – الجزء الثاني - الجمل الشرطية

الاسم: سلسلة تعلم VBScript – الجزء الثاني - الجمل الشرطية سلسلة تعلم VBScript – الجزء الثاني - الجمل الشرطية

مرات القرائه: 143 مرة/مرات

التقييم:

قم بدعوة صديق

اعلانات في الموقع على جميع الصفحات

سلسلة تعلم VBScript – الجزء الثاني - الجمل الشرطية

سلسلة تعلم VBScript – الجزء الثاني - الجمل الشرطية

الدرس الخامس: الجمل الشرطية

لا شك أن جميع المبرمجين يدركون أهمية الجمل الشرطية في بناء شيفرة البرنامج أو النص البرمجي، وعلى الأخص الجملة ذات البادئة IF … وكثيرا ما نصادف الألغاز التي تتمحور فكرتها حول تنفيذ مهمة معينة دون الاعتماد على الجمل الشرطية، وهذا ما
يقودنا إلى أهمية هذه الجمل في تكوين الشيفرات …

المعاملات Operators :

المعاملات هي رموز تستخدم للربط بين تعبيرين أو أجزاء عمليه حسابيه بينهما، وتم
التطرق لها هنا نظرا لارتباطها الوثيق بموضوع الجمل الشرطية،ونستطيع تقسيم
المعاملات في لغة VBScript إلى ثلاث أقسام.
المعاملات الحسابية:

وهي رموز العمليات الرياضية وهي كالتالي:

معاملات المقارنة:

وتستخدم مع العمليات الرياضية وهي كالتالي: (ملاحظة الأمثلة ستجدها مدمجة مع أمثلة
المعاملات المنطقية والتي سنتطرق لها بعد قليل)

المعاملات المنطقية:

تستخدم المعاملات المنطقية لإيجاد نتيجة تعبير ... هل هي صحيحة أم خاطئة.. وفيما
يلي المعاملات المنطقية التي تحويها لغة VBScript مع أمثلة لكل معامل...

ملاحظة:في جميع الأمثلة التالية افترض اننا قمنا باسناد القيم إلى المتغيرين A وB
على الشكل التالي.

A = 5

B = 4

الجملة الشرطية If …. Then

تستخدم الجمل الشرطية لتنفيذ أمر معين عند تحقق شرط ما والصيغة العامة للجملة IF
السابقة هي كالتالي:

شفرة برمجية :

If (شرط)
Then (الأمر الذي سيتحقق في حال كون الشرط السابق صحيحا)

وهذا مثال على استعمال التركيب السابق للجملة If

شفرة برمجية :

Num = InputBox("ادخل رقما")

If Num > 100 Then
msgbox "هذا الرقم اكبر من 100"

إذا تغاضينا عن تفاهة المثال لأننا هنا في موطن التعلم ولكن سنتطرق لأمثلة أكثر
تقدما في المستقبل …

سنجد أن المثال السابق يحتوي على الشرط Num > 100 فإذا تحقق الشرط فإن البرنامج
سيظهر مربع رسالة تفيد بان الرقم المدخل أكبر من 100.

الجملة If …. Then…. Else

لاحظت في المثال السابق أنه سيتم إظهار رسالة إذا كان الرقم أكبر من 100 ولكنه لن
يحصل شيئا إذا كان عدا ذلك، في الجملة If …. Then…. Else سوف تستطيع إظهار رسالة
أخرى إذا كان الرقم أصغر من أو يساوي 100 وذلك من خلال الجزء الذي أضفناه والمسمى
Else وهذه هي الصيغة العامة للجملة السابقة:

شفرة برمجية :

If (شرط)
Then

(الأمر الذي سيتحقق في حال كون الشرط السابق صحيحا)

Else

(الأمر الذي سيتحقق في حال كون الشرط السابق خاطئا)

End If

والآن لاحظ التعديل على المثال السابق

شفرة برمجية :

Num = InputBox("ادخل رقما")

If Num > 100 Then

Msgbox "هذا الرقم اكبر من 100"

Else

Msgbox "هذا الرقم اصغر من أو يساوي 100"

End If

الجملة If …. Then…. ElseIf

لا شك انك الآن توقعت معنى الإضافة ElseIf والتي تستخدم إذا كان هناك اكثر من شرط..
وهذه هي الصيغة العامة للجملة السابقة…

شفرة برمجية :

If (1 شرط)
Then

(الأمر الذي سيتحقق في حال كون الشرط 1 صحيحا)

ElseIf (2 شرط) Then

(الأمر الذي سيتحقق في حال كون الشرط 2 صحيحا)

.

.

Else

(الأمر الذي سيتحقق إذا لم يتحقق أيا من الشروط السابقة)

End If

واليك هذا المثال… الذي سيختبر هل القيمة المدخلة موجبة أم سالبه أم مساوية
للصفر.

شفرة برمجية :

Num = InputBox("ادخل رقما")

If Num > 0 Then

msgbox "القيمة المدخلة موجبة"

ElseIf Num < 0 Then

msgbox "القيمة المدخلة سالبة"

Else

msgbox "القيمة المدخلة تساوي الصفر"

End If

الجملة Select Case

تتشابه الجملة Select Case مع الجملة If …. Then…. ElseIf ولكن الجملة Select Case
تعتبر افضل استخداما عندما يكون التفرع لأكثر من شرطين لأنها تظهر بنية الشيفرة
بشكل أوضح وستلاحظ ذلك لاحقا، أيضا البنية السابقة تستخدم عندما يكون الاختيار بناء
على متغير واحد، وهذه هي الصيغة العامة للجملة Select Case

شفرة برمجية :

Select Case (متغير)

Case (القيمة 1)

الأمر الذي سيتحقق إذا كانت قيمة المتغير مساوية للقيمة 1

Case (القيمة 2)

الأمر الذي سيتحقق إذا كانت قيمة المتغير مساوية للقيمة 2

.

.

.

Case Else

الأمر الذي سيتحقق إذا لم تكن قيمة المتغير مساوية لأي من القيم

السابقة

End Select

ويمكن الاستغناء عن Case Else عند عدم الحاجة إليها.

وهذا مثال على استخدام الجملة السابقة

شفرة برمجية :

strChos = "ادخل أحد الألوان التالية ليتم تحويل لون الخلفية"

strChos = strChos + "إليه .. احمر، اخضر، ازرق، اسود"

BkGd = InputBox(strChos,"تحديد لون الخلفية")

Select Case BkGd

Case "احمر"

document.bgColor = "FF0000"

Case "اخضر"

document.bgColor = vbGreen

Case "ازرق"

document.bgColor = "0000FF"

Case "اسود"

document.bgColor = vbBlack

Case Else

msgbox "فضلا تأكد من صحة تهجئة الكلمة"

End Select

درس سلسلة تعلم VBScript – الجزء الثاني - الجمل الشرطية

أضف هذه المادة في موقعك:

مواد مشابهة:

	أخذ نسخة إحتياطية لقاعدة من لوحة التحكم أخذ نسخة إحتياطية لقاعدة من لوحة التحكم (مرات المشاهدة: 311 مرات)
	الوظائف , تعريفها وإستخداماتها الوظائف , تعريفها وإستخداماتها (مرات المشاهدة: 308 مرات)
	شرح طريقة تفريغ البحث + إعادة بناء البحث شرح طريقة تفريغ البحث + إعادة بناء البحث (مرات المشاهدة: 171 مرات)
	مقدمة للغة ASP مقدمة للغة ASP (مرات المشاهدة: 242 مرات)
	XML [الدرس الرابع-الجزء الأول]: منهجية عمل مستندات XML وتكوينها الهرمي XML [الدرس الرابع-الجزء الأول]: منهجية عمل مستندات XML وتكوينها الهرمي (مرات المشاهدة: 100 مرات)
	هاك الاوسمه والتحكم فيه هاك الاوسمه والتحكم فيه (مرات المشاهدة: 314 مرات)
	تعلم بيرل : تشغيل بيرل على كومبيوترك تعلم بيرل : تشغيل بيرل على كومبيوترك (مرات المشاهدة: 178 مرات)
	دورة XML [الدرس الأول]: ماذا قبل XML دورة XML [الدرس الأول]: ماذا قبل XML (مرات المشاهدة: 153 مرات)
	المعرّف (ID) المعرّف (ID) (مرات المشاهدة: 144 مرات)
	ماهية الجافا سكريبتس وعملها ماهية الجافا سكريبتس وعملها (مرات المشاهدة: 156 مرات)