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

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : ضرب قيمتين (/showthread.php?tid=339)

الصفحات: 1 2


ضرب قيمتين - Mido9 - 30-09-13

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

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

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


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

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


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

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


وجزاكم الله خيرا ,,


RE: ضرب قيمتين - sooriaty03 - 30-09-13

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

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

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

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

End 
Try 

بالتوفيق


RE: ضرب قيمتين - Mido9 - 30-09-13

(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 اي انه يضع الرقمان معاً ولا يجمعهما

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


RE: ضرب قيمتين - الشاكي لله - 30-09-13

(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


RE: ضرب قيمتين - Mido9 - 30-09-13

(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


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

بارك الله فيك

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


شكرا لكم اخوتي الافاضل


RE: ضرب قيمتين - eng.khalidvb - 30-09-13

السلام عليكم اخي جرب هذا الكود

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 

عفو لم انتبه للرد الا بعد تحديث الصفحة شكر لكل الاعضاء تقبل مروري


RE: ضرب قيمتين - ahmed_king2023 - 22-08-23

كيف  بضربهم ببعض
          ممكن توضيح
كود :
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();


RE: ضرب قيمتين - Taha Okla - 22-08-23

- أولاً لازم تمنع كتابة أي شيء في مربعات النص عدا الارقام
- ثانياً تستخدم الكود التالي :

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



RE: ضرب قيمتين - ahmed_king2023 - 23-08-23

لدي 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();
       }
نفس مشكلة تنسيق ادخال غير صحيح

رسالة خطا تنسيق  سلسلة غير صحيح


RE: ضرب قيمتين - Taha Okla - 23-08-23

كود :
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();


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

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