اهلا وسهلا بك فى بوابة الثانوية العامة ... سجل الان

  #1  
قديم 06-04-2016, 01:38 PM
omar_dedo omar_dedo غير متواجد حالياً
عضو جديد
 
تاريخ التسجيل: Mar 2010
المشاركات: 21
معدل تقييم المستوى: 0
omar_dedo is on a distinguished road
افتراضي سؤال مهم فى الاكواد .....

Dim X ,Y as single

x=Me.TextBox1.text

Y=3+5x

label1.text=Y
فى البرنامج السابق قام المستخدم بادخال قيمة نصية ... قم بتصحيح الكود باستخدام جملة Try/catch
رد مع اقتباس
  #2  
قديم 06-04-2016, 02:33 PM
الفرسان2009 الفرسان2009 غير متواجد حالياً
عضو جديد
 
تاريخ التسجيل: Oct 2009
المشاركات: 34
معدل تقييم المستوى: 0
الفرسان2009 is on a distinguished road
افتراضي

انت تقصد اكتشاف الاخطاء:
Dim X ,Y as single
Try
x=Me.TextBox1.text

Y=3+5

label1.text=Y
Catch
Messagebox.show (" please insert numeric value
End try
رد مع اقتباس
  #3  
قديم 16-04-2016, 05:59 PM
mhraffat84 mhraffat84 غير متواجد حالياً
عضو مبتدئ
 
تاريخ التسجيل: Mar 2010
المشاركات: 51
معدل تقييم المستوى: 16
mhraffat84 is on a distinguished road
افتراضي


يمكن كتابة نفس البرنامج ولكن بدلاً من messagebox نظهر الرسالة في نفس Label الإجابة ..

Dim X ,Y as single
Try
x=Me.TextBox1.text

Y=3+5

label1.text=Y
Catch
" label1.Text= " please insert numeric value
End try

رد مع اقتباس
  #4  
قديم 07-05-2016, 03:18 AM
hassantawfic hassantawfic غير متواجد حالياً
عضو جديد
 
تاريخ التسجيل: Dec 2009
المشاركات: 29
معدل تقييم المستوى: 0
hassantawfic is on a distinguished road
افتراضي

[B]Dim X ,Y as single
Try
x=Me.TextBox1.text


Catch
" label1.Text= " please insert numeric value
End try
y=3+5X

label1.text=y
[
/B]
يكتب الكود الذى يحتمل وجود خطا فيه بعد كلمه Try
اما ياقى الاكواد بعد End try
when there are no erro
r
رد مع اقتباس
إضافة رد

العلامات المرجعية

أدوات الموضوع
انواع عرض الموضوع

ضوابط المشاركة
لا تستطيع إضافة مواضيع جديدة
لا تستطيع الرد على المواضيع
لا يمكنك اضافة مرفقات
لا يمكنك تعديل مشاركاتك

BB code متاحة
كود [IMG] متاحة
كود HTML معطلة

الانتقال السريع


جميع الأوقات بتوقيت GMT +2. الساعة الآن 05:35 AM.