الزياد 2015الحديثة

[saad14]

هذا الكود قد كتبته فى نافذة الكود
Dim x As Integer
x = TextBox1.Text
( x = (4 * 3 ^ 2) / (10 Mod 3 - 1
وبمجرد الانتهاء من كتابة الكود ظهر خط أزرق متعرج تحت التعبير الحسابى ولم يختفى الخط الازرق الا بعد تعديل الكود لانه لا يجز القسمة على صفر واعتبره البرنامج خطا من النوع Syntax error
الاجابة :
الخطأ syntax error فى هذه العباراة يرجع لاختيارك نوع بيان رقمى صحيح integer مع اجراء عملية قسمة تعطى نتائج عشرية
من فضلك جرب الكود مرة آخرى بعد تغيير نوع البيان الى single و سترى الفرق

Dim x As single
x = TextBox1.Text
( x = (4 * 3 ^ 2) / (10 Mod 3 - 1

[ابو موده]

المشاركة الأصلية كتبت بواسطة saad14

هذا الكود قد كتبته فى نافذة الكود
Dim x As Integer
x = TextBox1.Text
( x = (4 * 3 ^ 2) / (10 Mod 3 - 1
وبمجرد الانتهاء من كتابة الكود ظهر خط أزرق متعرج تحت التعبير الحسابى ولم يختفى الخط الازرق الا بعد تعديل الكود لانه لا يجز القسمة على صفر واعتبره البرنامج خطا من النوع Syntax error
الاجابة :
الخطأ syntax error فى هذه العباراة يرجع لاختيارك نوع بيان رقمى صحيح integer مع اجراء عملية قسمة تعطى نتائج عشرية
من فضلك جرب الكود مرة آخرى بعد تغيير نوع البيان الى single و سترى الفرق

Dim x As single
x = TextBox1.Text
( x = (4 * 3 ^ 2) / (10 Mod 3 - 1

ارجو الانتباه هنا ان تركت
x = TextBox1.Text
فارغة سعطيك خطأ اثناء التشغيل

شيلها افضل

[nouranet]

أستاذى الفاضل

أشكرك على اهتمامك بالرد على أسئلتى
وكنت محتاج من حضرتك نموذج لاجابة مذكرة الزياد 2014
فهل هى متوفرة لدى حضرتك

ولك جزيل الشكر والتقدير على مساعدتك وتعاونك

[nouranet]

ما ناتج الدالة Isnumeric
("Msgbox Isnumeric ( "6

[saad14]

ناتج الدالة Isnumeric دائما قيمة منطقية تأخذ True أو False
ناتج هذا الكود :
(("Msgbox( Isnumeric ( "6
هى رسالة True

[nouranet]

أولا :-تعتبر 6 قيمة رقمية وفى تلك الحالة يعتبر الناتج True
ولكن "6" توجد بين علامتى تنصيص ولذلك فهى قيمة نصية وبالتالى يكون الناتج False إذا ما هو وجه الإختلاف

أرجو التوضيح

ثانيا :- مذكرة الزياد للمراجعة بها أسئلة قيمة جدا وأغلبها يحتاج إلى توضيح
هل مذكرة الزياد 2014 لها نموذج إجابة أم لا

( لإستخدامها كمرجع للتأكد من صحة الإجابات )
كل الشكر لإهتمامك

وجزاك الله خيرا