الزياد 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