[Tarik 14]

سلام عليكم ,, كيف حالكم اخواني ان شاء الله بخير


ابي طريقة لتجاوز الاخطاء اللي في Textbox

عملت الة حاسبة ووضعت 6 Textbox ولما يكون فيه فراغ ماكتبت فيه شي , ابيه يطلع لي رسالة خطأ

والكود التالي عليه الخطأ :

كود :

Text1.text = (Val(Text2.text) * Val(Text3.text)) + (Val(Text4.text) * Val(Text5.text)) / Val(Text6.text)

هذا الكود اللي يظهر لي خطأ واتمنى تساعدوني بأقرب وقت
ودمتم بألف خير[/php]

[تركي الحلواني]

ضع هذا الامر في اول الحدث

PHP كود :

On Error Resume Next 


[محمد صبري]

اخى الكود الصحيح هو

الكود بتاعك فيه تعديلات بسيطة وانا عدلتهالك

كود :

Text1.Text = Val(Text2.Text) * Val(Text3.Text) + Val(Text4.Text) * Val(Text5.Text) / Val(Text6.Text)

بدون استخدام كود تفادي الاخطاء
on error resume next

لو كتبت جملة تفادي الاخطاء دي الكود ده بيكون مالوش لازمة لان الكود كان فيه اخطاء وكود تفادي الاخطاء فقط يمنع توقف البرنامج لاكن لا يحل مشكلة او مابيجعل الكود يعمل اعتمد على تصحيح الاكواد من الافضل

[asto]

بسيطة ضع شرطا و هو :

كود :

if  not text6.text=0 then
Text1.text = (Val(Text2.text) * Val(Text3.text)) + (Val(Text4.text) * Val(Text5.text)) / Val(Text6.text)
endif

يعني هذه العملية لن تنفذ في حال التكست6 =0

[السيد الغالي]

if text6="" then
"خطأ"msgbox
end if
استخدام هذا الكود يضهر رسالة خطأ في حالة كون text6 فارغ

[Tarik 14]

يعطيكم الف عافية ,,