Goto & select
Download as PPT, PDF0 likes563 views
تتناول الوثيقة قواعد أساسية في لغة البرمجة فيجوال بيسك، وتشرح كيفية استخدام العبارات الشرطية مثل goto وselect case. يتم توضيح الفرق بين الانتقال غير المشروط والمشروط، بالإضافة إلى كيفية تنفيذ عمليات حسب شروط معينة. كما يحتوي المستند على أمثلة عملية لتوضيح تطبيقات هذه القواعد.
Goto & select
- 1. بعض القواعد الساسية في لغة الفيجوال بيسك Go Toالجملة الشرطية , Select Case
- 2. ملظحظة هامة جدا • لدراسة قواعد لغة البرمجة يجب التنتباه إلى الليتي :- 1- وظيفة القاعدة . 2- صيغة القاعدة . 3- حفظ أمر القاعدة باللغة الجنجليزية .
- 3. التنتقال -: الوظيفة GoTo ... يتم النتقال من جزء إلى جزء آخر في البرنامج أثناء تنفيذه .. و هناك نوعان من النتقال 1 .... النتقال غير المشروط:- النتقال لسطر محدد دون التقيد بأي شرط-1 GOTO line مثــال Dim n as string , g as integer )”أدخل اسمك “(n= inputbox GOTO A Text1.text = n :A )” & nشكرا لستخدامك البرنامج “ (msgbox
- 4. التنتقال -: الوظيفة GoTo ... يتم النتقال من جزء إلى جزء آخر في البرنامج أثناء تنفيذه .. و هناك نوعان من النتقال 2 .... النتقال المشروط:- النتقال لسطر محدد عندما يتحقق شرط معين-1 IF condition THEN GOTO line مثــال IF g >= 90 THEN GOTO A IF g<90 THEN GOTO B :A ”ممتاز “ = Text1.text :B ”جيد جدا “= Text1.text ”ً
- 5. Case -: الوظيفة ... تستخدم لتنفيذ عمليات معينة حسب شرط محدد : حيث أن 1 -.SELECT CASEةدعاقلا ةغيص ةيادبداية صيغة القاعدة : 2 -.expressionالتعبير الذي نريد تقييمه : 3 - CASEتوضع قبل كل احتمال من احتمالت : التعبير الذي نريد تقييمه . 4 -2,,prob1, probالحتمالت التي نريد : تقييمها للتعبير . 5 -CASE ELSEعندما ل يتحقق أي احتمال : وهي اختيارية . 6 - .END SELECTنهاية القاعدة : SELECT CASE expression 1CASE prob …… 1Statments ..… 2CASE prob .… 2Statments … CASE ELSE ..… 3Statment .… END SELECT
- 6. select case تابع SELECT CASE grade CASE 100 to 90 Text1.text= “ ”ممتاز CASE 89 to 80 Text1.text = “ ”جيد جدا CASE 79 to 70 Text1.text = “ ”جيد CASE 69 to 60 Text1.text = “ ” مقبول CASE Else Text1.text = “ ” راسب END SELECT مثــال
- 7. الواجـــــــــــــــــــب Dim x as string, y as integer )“ نم امقر لخدأدخل رقما من1 إلى3 “ ( Y = inputbox )”نم امقر لخدأدخلي اسم المجموعة “( X = inputbox Select Case y 1 Case ) ” & xايا الواجب هو س31“ (msgbox 2 Case “ ةدعاق ةغيصيغة قاعدة ما هي/ الواجب س31 و س ”Select caseايا (msgbox )& x 3 Case ) ” ” & xالواجب هو س7 و س31ايا (msgbox Case Else ) ” & xالرقم المدخل خاطئ ايا“ (msgbox END SELECT
- 8. التطبيق • في كتابك العملي تدرايب )3-5 ( التطبيق الرابع :- قومي بكتابة برنامج باستخدام الفيجوال بيسك ايقوم بإدخال درجات طالب في مادة الحاسب و هذه الدرجات هي : )نم امقر لخدأعمال السنة للفصلين و اختبار الفصلين الول و الثاني (حيث ايقوم البرنامج بحساب مجموع هذه الدرجات و طباعة التقداير و ايكون التقداير كالتالي :- الدرجة فأكثر 09 التقداير ممتاز 98 - 08 جيد جدا 97 – 07 جيد 05 - 96 مقبول 0 - 94 راسب