منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : ضرب قيمتين
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
الصفحات : 1 2
السلام عليكم ورحمة الله وبركاتة

اخواني الافاضل ،، انا الان لدي عدد 3 تيكست بوكس

اريد ان اضرب التيكست بوكس الاول فى التاني ويظهر الناتح فى الثالث


جربت هذا الكود

PHP كود :
TextBox7.Text TextBox5.Text TextBox6.Text 


وظهر لي الخطأ التالي

PHP كود :
Conversion from string "" to type 'Double' is not valid
فى نفس السطر


وجزاكم الله خيرا ,,
السلام عليكم ورحمة الله وبركاته

أخي الخطأ طبيعي لأن مربع النص إذا كان فارغا أو به نص فلن يتمكن من تحويله إلى رقم لكي تتم عملية الضرب

ولكن تستطيع أن تقوم بوضع كود لتصيد الأخطاء بالشكل التالي

PHP كود :
Try
    
TextBox7.Text TextBox5.Text TextBox6.Text
Catch ex As Exception

End 
Try 

بالتوفيق
(30-09-13, 12:37 AM)sooriaty03 كتب : [ -> ]السلام عليكم ورحمة الله وبركاته

أخي الخطأ طبيعي لأن مربع النص إذا كان فارغا أو به نص فلن يتمكن من تحويله إلى رقم لكي تتم عملية الضرب

ولكن تستطيع أن تقوم بوضع كود لتصيد الأخطاء بالشكل التالي

PHP كود :
Try
    
TextBox7.Text TextBox5.Text TextBox6.Text
Catch ex As Exception

End 
Try 

بالتوفيق

وعليكم السلام ورحمة الله وبركاتة

بالفعل تم تجربة الكود ونجح الحمد لله بارك الله فيك

ولكن هنالك مشكلة اخرى تواجهني إذا سمحت لي

عندما اقوم بعمل نفس الكود الخاص بك ولكن فى حالة الجمع

Try
Label24.Text = TextBox7.Text + TextBox13.Text
Catch ex As Exception

End Try


للاسف لا يجمع بل يضع القيمتين معاً ..

بمعنى الان لنفترض ان قيمة التيكست بوكس الاول 5 و التيكست بوكس الثاني 2

من المفترض ان يكون الليبل قيمته 7 ( مجموع الإثنان ) ولكن للاسف تصبح قيمه الليبل 52 اي انه يضع الرقمان معاً ولا يجمعهما

ياريت لو تساعدني فى هذا الامر وجزاك الله خيرا
(30-09-13, 12:56 AM)Mido9 كتب : [ -> ]
(30-09-13, 12:37 AM)sooriaty03 كتب : [ -> ]السلام عليكم ورحمة الله وبركاته

أخي الخطأ طبيعي لأن مربع النص إذا كان فارغا أو به نص فلن يتمكن من تحويله إلى رقم لكي تتم عملية الضرب

ولكن تستطيع أن تقوم بوضع كود لتصيد الأخطاء بالشكل التالي

PHP كود :
Try
    
TextBox7.Text TextBox5.Text TextBox6.Text
Catch ex As Exception

End 
Try 

بالتوفيق

وعليكم السلام ورحمة الله وبركاتة

بالفعل تم تجربة الكود ونجح الحمد لله بارك الله فيك

ولكن هنالك مشكلة اخرى تواجهني إذا سمحت لي

عندما اقوم بعمل نفس الكود الخاص بك ولكن فى حالة الجمع

Try
Label24.Text = TextBox7.Text + TextBox13.Text
Catch ex As Exception

End Try


للاسف لا يجمع بل يضع القيمتين معاً ..

بمعنى الان لنفترض ان قيمة التيكست بوكس الاول 5 و التيكست بوكس الثاني 2

من المفترض ان يكون الليبل قيمته 7 ( مجموع الإثنان ) ولكن للاسف تصبح قيمه الليبل 52 اي انه يضع الرقمان معاً ولا يجمعهما

ياريت لو تساعدني فى هذا الامر وجزاك الله خيرا

بعد اذن الاخ sooriaty03

لانك لم تحول النص الى صيغة عددية

استعمل الدالة Val
(30-09-13, 01:07 AM)الشاكي لله كتب : [ -> ]
(30-09-13, 12:56 AM)Mido9 كتب : [ -> ]
(30-09-13, 12:37 AM)sooriaty03 كتب : [ -> ]السلام عليكم ورحمة الله وبركاته

أخي الخطأ طبيعي لأن مربع النص إذا كان فارغا أو به نص فلن يتمكن من تحويله إلى رقم لكي تتم عملية الضرب

ولكن تستطيع أن تقوم بوضع كود لتصيد الأخطاء بالشكل التالي

PHP كود :
Try
    
TextBox7.Text TextBox5.Text TextBox6.Text
Catch ex As Exception

End 
Try 

بالتوفيق

وعليكم السلام ورحمة الله وبركاتة

بالفعل تم تجربة الكود ونجح الحمد لله بارك الله فيك

ولكن هنالك مشكلة اخرى تواجهني إذا سمحت لي

عندما اقوم بعمل نفس الكود الخاص بك ولكن فى حالة الجمع

Try
Label24.Text = TextBox7.Text + TextBox13.Text
Catch ex As Exception

End Try


للاسف لا يجمع بل يضع القيمتين معاً ..

بمعنى الان لنفترض ان قيمة التيكست بوكس الاول 5 و التيكست بوكس الثاني 2

من المفترض ان يكون الليبل قيمته 7 ( مجموع الإثنان ) ولكن للاسف تصبح قيمه الليبل 52 اي انه يضع الرقمان معاً ولا يجمعهما

ياريت لو تساعدني فى هذا الامر وجزاك الله خيرا

بعد اذن الاخ sooriaty03

لانك لم تحول النص الى صيغة عددية

استعمل الدالة Val


جزاك الله خيرا اخي الفاضل على المساعده

بارك الله فيك

تمت التجربه ونجحت الحمد لله


شكرا لكم اخوتي الافاضل
السلام عليكم اخي جرب هذا الكود

PHP كود :
Try

            
' عملية جمع عددين
            Label1.Text = Val(TextBox1.Text) + Val(TextBox2.Text)

            '
عملية ضرب عددين
            Label1
.Text Val(TextBox1.Text) * Val(TextBox2.Text)

            
'عملية قسمة عددين
            Label1.Text = Val(TextBox1.Text) / Val(TextBox2.Text)

            '
عملية طرح عددين
            Label1
.Text Val(TextBox1.Text) - Val(TextBox2.Text)

        Catch 
ex As Exception
            MsgBox
(ex.MessageMsgBoxStyle.Critical"خطاء في العمليه الحسابيه")
        
End Try 

عفو لم انتبه للرد الا بعد تحديث الصفحة شكر لكل الاعضاء تقبل مروري
كيف  بضربهم ببعض
          ممكن توضيح
كود :
decimal c;
           c = Convert.ToDecimal(Txt_price.Text) * Convert.ToDecimal(Txt_Tklfa.Text);
           ss.Text =Convert.ToString( c);

استخدم c#

جربت هدا حل يظهر خطا تنسيق سلسلة غير صحيح
decimal a, b, c;
a = Convert.ToDecimal(Txt_price.Text);
b = Convert.ToDecimal(Txt_Tklfa.Text);
c = a + b;
ss.Text = c.ToString();
- أولاً لازم تمنع كتابة أي شيء في مربعات النص عدا الارقام
- ثانياً تستخدم الكود التالي :

كود :
decimal c;
c = Convert.ToDecimal(textBox1.Text.Trim()) * Convert.ToDecimal(textBox2.Text.Trim());
label9.Text= c.ToString();
لدي 3 تكست بوكس 
عملت كود في حدث keypress لثلاثه تكتست بوكس انه يقبل ارقام هادي اولا 
كود :
 private void Txt_Tklfa_KeyPress(object sender, KeyPressEventArgs e)
       {
          if(char.IsDigit(e.KeyChar)==false && e.KeyChar!= '.'  )
               e.Handled = true;
       }

       private void Txt_price_KeyPress(object sender, KeyPressEventArgs e)
       {
           if (char.IsDigit(e.KeyChar) == false && e.KeyChar != '.')
               e.Handled = true;
       }

       private void ss_KeyPress(object sender, KeyPressEventArgs e)
       {
           if (char.IsDigit(e.KeyChar) == false && e.KeyChar != '.')
               e.Handled = true;
       }
   }
معادلة كتبته في حدث هدا 
كود :
private void textEdit1_EditValueChanged(object sender, EventArgs e)
       {
           decimal c;
           c = Convert.ToDecimal(Txt_price.Text.Trim()) * Convert.ToDecimal(Txt_Tklfa.Text.Trim());
           ss.Text = c.ToString();


       }

       private void Txt_price_EditValueChanged(object sender, EventArgs e)
       {
           decimal c;
           c = Convert.ToDecimal(Txt_price.Text.Trim()) * Convert.ToDecimal(Txt_Tklfa.Text.Trim());
           ss.Text = c.ToString();

       }

       private void Txt_Tklfa_EditValueChanged(object sender, EventArgs e)
       {
           decimal c;
           c = Convert.ToDecimal(Txt_price.Text.Trim()) * Convert.ToDecimal(Txt_Tklfa.Text.Trim());
           ss.Text = c.ToString();
       }
نفس مشكلة تنسيق ادخال غير صحيح

رسالة خطا تنسيق  سلسلة غير صحيح
كود :
if (textBox1.Text.Trim() == "") textBox1.Text = "0";
if (textBox2.Text.Trim() == "") textBox2.Text = "0";

decimal c;
c = Convert.ToDecimal(textBox1.Text.Trim()) * Convert.ToDecimal(textBox2.Text.Trim());
label9.Text = c.ToString();


ما دام بتشوف حالك أنك تعلمت الاساسيات وتجاوزتها، راح تظل تقع بالأخطاء الصغيرة وتضيع الكثير من الوقت عليها..

لآخر مرة بنصحك :
.. أرجع تعلم الأساسيات وركز في الفيديوهات التعليمية، 
ولا تضيع منها أي ثانية أو لحظة وحدة من كل فيديو بتشوفه..
بكل لحظة فيه معلومة جديدة إما مكتوبة أو مشروحة..
الصفحات : 1 2