الخطأ هنا من نوع أخطاء عند التشغيل Runtime Errors والذى يمكن أن يحدث نتيجة :
يسعدنا برؤيتكم زوارنا في موقع jz0ralalm ↓الموقع العالمي في جميع المجالات العالمية حيث تجد كل الاجابات على السؤال الذي تبحث عليه في شتى المجالات مـنــصـة ( جــذور الــعــلـــم ) يقدم لكم إجابات المناهج التعليمية والدراسية وكل ما يتعلق بدراساتكم لجميع المراحل الابتدائية ، والمتوسطة ، والثانوية ، والمعلومات الصحيحة ، والدقيقة ، والألغاز ، والأسئلة ، والألعاب المسلية
يمكنك طرح سؤالك الذي لم تجد له أي إجابة في مربع اطرح سؤالاً أو من خلال إجابة تحت وسوف يتم الرد عليك من احدى مشرفين الموقع
والان سوف نقدم لكم الإجابة الصحيحة على السؤال™ الذي تبحث عليه في شتى المجالات والسؤال يقول ¶
الخطأ هنا من نوع أخطاء عند التشغيل Runtime Errors والذى يمكن أن يحدث نتيجة :
الإجابة الصحيحة والنموذجية هي
1 - عند إدخال قيمة نصية فى صندوق النص TextBox1
2 - أو عند عدم إدخال أى بيانات فى صندوق النص TextBox1
3 - أو عند إدخال بيانات رقمية تتعدى حدود مدى نوع البيان Byte وهى من 0 : 255
وعندها لن يستطيع مترجم اللغة Compiler تحويل القيمة النصية أو السلسلة النصية الفارغة لنوع البيان Data Type المناسب وهو Byte . ولتجنب هذا الخطأ يتم تعديل الكود كما يلى :
Dim Radius As Byte
Try
Radius = Me.TextBox1.Text
Catch ex As Exception
MsgBox("من فضلك أدخل قيم عددية فى صندوق النصوص")
End Try
هناك طريقة أخرى لتجنب مثل تلك الأخطاء باستخدام الدالة Isnumeric( ) مع جملة If و سيتم شرحها فى الفصل الثانى