|
أسئلة للتفكير - عاطف مهدى حسان مايو 2016
أسئلة للتفكير (1) السؤال الأول : إذكر نوع الخطأ فى الجمل التالية إن وجد :- Dim X As Single=5 000 Dim X As Single="5" 000 Dim X As Single="Five" 000 السؤال الثانى : إكتب علامة صح او خطأ بما يناسب العبارات التالية :- 1- يمكن استخدام علامة الشرطة السفلية (_) كاسم لمتغير فى البرنامج 2- يمكن أن يزيد اسم المتغير عن 200 حرف السؤال الثالث : إذكر ما يتم عرضه فى صندوق الرسالة فى الحالات التالية الحالة الاولى Dim X as single For X = 1 to 10 step 0 MsgBox (X) 000 Next MsgBox ("Hiiiii " & X) 000 الحالة الثانية Dim X as single For X = 10 to 1 step 0 MsgBox (X) 000 Next MsgBox ("Hiiiii " & X) 000 الحالة الثالثة Dim X as single For X = 1 to 10 MsgBox (X) 000 Next MsgBox ("Hiiiii " & X) 000 الحالة الرابعة Dim X as single For X = 10 to 1 MsgBox (X) 000 Next MsgBox ("Hiiiii " & X) 000 مع أطيب الامنيات بالتفوق عاطف مهدى حسان - ميت موسى |
شكرا جزيلا ايها المحترم
السلام عليكم ورحمة الله وبركاته
اهلا اهلا بالسيد الاستاذ / عاطف مهدي ... كل عام والجميع بالف الف خير ** Dim X As Single=5..... لا يوجد خطأ وسيتم تخزين القيمة 5 في المتغير x ** "Dim X As Single="5 .... أيضا لا يوجد خطأ وعن طريق التحويل الضمني سيقوم باستخلاص القيمة العددية 5 وتخزينها في المتغير x رغم انها بين علامتي تنصيص ... اي يمكن اعتبارها نصا... ** Dim X As Single="Five" ...... خطأ عند التشغيل من النوع Invalid Cast .... وستظهر رسالة عند النشغيل تؤكد ذلك ** - يمكن استخدام علامة الشرطة السفلية (_) كاسم لمتغير فى البرنامج ( خطأ ) ** يمكن أن يزيد اسم المتغير عن 200 حرف ( مجربتهاش ) ** Dim X as single For X = 1 to 10 step 0 MsgBox (X) 000 Next MsgBox ("Hiiiii " & X) ** يستمر البرنامج في عرض القيمة ( 1 ) باستمرار وبلا نهاية .. الحالة الثانية ** Dim X as single For X = 10 to 1 step 0 MsgBox (X) 000 Next MsgBox ("Hiiiii " & X) ** سيقوم بعرض مربع رسالة به القيمة Hiiiii 10 مرة واحدة وهي الرسالة الموجودة بعد next مما يعني ان المتغير x سيأخذ أول قيمة له وهي 10 ولن يتم تنفيذ التكرار ولا مرة .. ** الحالة الثالثة ** Dim X as single For X = 1 to 10 MsgBox (X) 000 Next MsgBox ("Hiiiii " & X) ** في هذه الحالة سيتم تنفيذ التكرار 10 مرات وبالتالي يعرض القيم من 1 حتى 10 في مربع رسالة وهي الرسالة الموجودة بين For و Next... ثم يتوقف التكرار مع القيمة 11 ليذهب وينفذ الكود الموجود بعد Next وعرض مربع رسالة به Hiiiiii 11... ** الحالة الرابعة ** نفس الحالة الثانية تماما ........ سيقوم بعرض مربع رسالة به القيمة Hiiiii 10 مرة واحدة وهي الرسالة الموجودة بعد next مما يعني ان المتغير x سيأخذ أول قيمة له وهي 10 ولن يتم تنفيذ التكرار ولا مرة .. شكرا جزيلا يا سادة ...هذا مجرد اجتهاد ..... كل عام وحضراتكم بالف الف خير |
نوع الخطأ (إملائي ونحوي )Dim X As Single="Five" 0
|
خطأ أثناء التشغيل
|
طب هو ابه الفرق بين الحاله الاولى والتانيه ف الاجاااابه ؟؟؟ وهوا هيكرر كام مره ؟؟
|
اقتباس:
فى الحالة الأولى الحالة الاولى Dim X as single For X = 1 to 10 step 0 MsgBox (X) 000 Next MsgBox ("Hiiiii " & X) 000 نلاحظ قيمة البداية أقل من قيمة النهاية فيتم التكرار إلى مالا نهاية و لا يتم الخروج من الحلقة التكرارية و تكون قيمة العداد X بعد كل تكرار هى قيمة البداية للعداد و هى 1 و فى هذا البرنامج سيتم طباعة قيمة العداد و هى [1] من خلال صندوق الرسالة لمالا نهاية و لا يتم التخلص من هذا الوضع اللا نهائى الا بعمل Stop Debugging الحالة الثانية Dim X as single For X = 10 to 1 step 0 MsgBox (X) 000 Next MsgBox ("Hiiiii " & X) 000 لاحظ قيمة البداية أكبر من قيمة النهاية و لن يتم التكرار و يأخذ المتغير X قيمة البداية للعداد و هى 10 و فى هذا البرنامج سيتم طباعة ما بعد Next و تنفيذ الجملةMsgBox ("Hiiiii " & X) 000 فيتم طباعة Hiiiii 10 أى طباعة Hiiiii متبوعة بقيمة العداد و هى [10] من خلال صندوق الرسالة أما إذا أردت لااستفسار لماذا لم يتم طباعة 10 لمالا نهاية فى الحالة الثانية كما حدث و طبع [1] لما لا نهاية كما فى الحالة الاولى - فأقول هذه هى ديناميكية عمل حملة For Next و من صمموا لغة البرمجة جعلوها تعمل كما سبق شرحه |
"Dim X As Single="5اجابة خاطئة نوع البيان string هو الذى يكتب بين علامتى تنصيص
|
اسم المتغير لا يزيد عن 255 حرف
|
أسئلة للتفكير (2)
أولا : أكمل 1- يتم إرجاع القيمة فى الدالة بإستخدام كلمة ــــــــــــــــــــــــــــــــ 2- لعرض الأعداد من 1.5 الى 0.5 بتناقص 0.05 كل مرة فى جملة For Next باستخدام العداد N نكتب الامر ــــــــــــــــــــــــ 3- للخروج من الحلقة التكرارية مباشرة بدون إنتظار اختبار التعبير الشرطى المكتوب فى بداية جملة Do While عندما تصبح قيمة المتغير FirstName تساوى Atef Mahdy نكتب الأمر ــــــــــــــــــــــــــــــــــــــــــــــــــ ــ ثانيا : اكتب علامة صح او خطأ بما يناسب العبارات التالية 1- يمكن إستخدام رمز الربط & للربط بين النصوص و المتغيرات 2- إذا تم كتابة كلمة حروفهاخطأ بعد Rem فى نافذة الكود يحدث خطأ املائى و نحوى Syntax Error 3- الدالة Function لها نوع بيان لأنها تعود بقيمة أما الإجراء Sub فليس له نوع بيان لأنه مجموعة من الأوامر و التعليمات يتم إستدعائها و لا تعود بقيمة السؤال الثالث : الاكواد قم بالتعديل المطلوب فى التدريب التالى لطباعة الأعداد تنازليا بدلا من تصاعديا بإستخدام جملة For Next Dim N , I As Integer N = TextBox1.text ListBox1.Items.clear() 000 For I = 1 To N Step 2 ListBox1.Items.Add(I) 000 Next مع أطيب الأمنيات بالنجاح و التفوق عاطف مهدى حسان - ميت موسى |
اقتباس:
.................. شكرااا :rolleyes: طب ماذا يحدث فى الكود التالى for m=1 to 10 step -2 msgbox(m( ??? |
اقتباس:
طالما أن قيمة البداية أقل من قيمة النهاية فى جملة For Next يجب أن تكون قيمة الزيادة التى بعد Step موجبة حتى يتم التكرار - و إذا كانت قيمة البداية أقل من قيمة النهاية فى جملة For Next و كانت قيمة الزيادة التى بعد Step سالبة لن يتم التكرار - و سواء تم تكرار أم لم يتم عندما يتم الذهاب لكلمة Next يتم تخزين قيمة البداية فى العداد لذلك فى هذه الجملة لن يتم التكرار لان قيمة البداية أقل من قيمة النهاية و قيمة الزيادة سالبة فيتم تخزين قيمة البداية 1 فى العداد M و بعد كلمة Next مباشرة تكون قيمة العداد M هى قيمة البداية [1] ========= عاطف مهدى |
أولا : أكمل /
1- يتم إرجاع القيمة فى الدالة بإستخدام كلمة ــــــــــــــــــــــــــــــــ 1/ input box 2- لعرض الأعداد من 1.5 الى 0.5 بتناقص 0.05 كل مرة فى جملة For Next باستخدام العداد N نكتب الامر ــــــــــــــــــــــــ 2/for n = 1.5 to .5 step -.5 next 3- للخروج من الحلقة التكرارية مباشرة بدون إنتظار اختبار التعبير الشرطى المكتوب فى بداية جملة Do While عندما تصبح قيمة المتغير FirstName تساوى Atef Mahdy نكتب الأمر ــــــــــــــــــــــــــــــــــــــــــــــــــ ــ if first name= atef mahdy then exit do ثانيا : اكتب علامة صح او خطأ بما يناسب العبارات التالية 1- يمكن إستخدام رمز الربط & للربط بين النصوص و المتغيرات صح 2- إذا تم كتابة كلمة حروفهاخطأ بعد Rem فى نافذة الكود يحدث خطأ املائى و نحوى Syntax Error خطأ 3- الدالة Function لها نوع بيان لأنها تعود بقيمة أما الإجراء Sub فليس له نوع بيان لأنه مجموعة من الأوامر و التعليمات يتم إستدعائها و لا تعود بقيمة صح السؤال الثالث : الاكواد قم بالتعديل المطلوب فى التدريب التالى لطباعة الأعداد تنازليا بدلا من تصاعديا بإستخدام جملة For Next Dim N , I As Integer N = TextBox1.text ListBox1.Items.clear() 000 For I = 1 To N Step 2 ListBox1.Items.Add(I) 000 ممكن اجابه السؤال الاخير ومراجعه اجابه الاسئله Ne xt |
اقتباس:
كل إجاباتك تقريبا صحيحة شكرا على مجهودك عاطف مهدى حسان = |
| جميع الأوقات بتوقيت GMT +2. الساعة الآن 01:22 PM. |
Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.