منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[سؤال] عملية حسابية بين تكست بوكس و ريتش بوكس - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (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=1393)

الصفحات: 1 2


عملية حسابية بين تكست بوكس و ريتش بوكس - MCPD - 30-12-13

السلام عليكم

انا بنفذ برنامج حسابى بسيط جدا
بحسب فيه عملية ضرب ارقام فى ثلاث تكست بوكس
الرقم الااول X الرقم الثانى = المجموع (فى الثلاث تكست بوكس)

وبعد وصول مؤشر الكتابة للتكست بوكس الثانى (اضغط على انتر) يضرب الرقمين فى التكست بوكس الثالث و يقوم بمسح التكست بوكس الاول والثانى ويصل المؤشر للتكست الاول لينقذ عملية حسابية جديدة

كل هذا سهل

اريد الان ان كل ما اكتبه فى التكست بوكس يكتب تلقائيا فى الريتش بوكس
وبعد كل عملية حسابية ينزل سطر فى الريتش بوكس
هكذا

2*3=12
5*5 = 25
6*3=16

طبعا هذه الارقام مأخوذة من التكست بوكس وعند الظغط على انتر لتنفيذ عملية حسابية جديدة ينزل سطر فى الريتش بوكس وينفذ امر الضرب الى فى التكست بوكس

وشكر جزيلا


RE: عملية حسابية بين تكست بوكس و ريتش بوكس - tarek - 30-12-13

[php]
ritchtextbox1.text = ritchtextbox1.text & textbox1.text& " * " & textbox2.text & " = " & textbox3.text


RE: عملية حسابية بين تكست بوكس و ريتش بوكس - mamas1 - 30-12-13

أبسط من البسيط Smile
ضع هذا الكود في الزر
PHP كود :
Richtextbox1.text Richtextbox1.text text1.text "×" text2.text "=" text3.text vbcrlf 



RE: عملية حسابية بين تكست بوكس و ريتش بوكس - MCPD - 30-12-13

شكرا جزيلا لكم
الكود شغال بنسبة 50 % فقط
يظهر علامات اليساوى والضرب والناتج فقط بدون الرقم الاول والثانى

هذا مثال من البرنامج لضرب 5*5 و 6*6

هذا ما ظهر فى الريتش بوكس

×=25
×=36


RE: عملية حسابية بين تكست بوكس و ريتش بوكس - mamas1 - 30-12-13

لازم تسوي التعديلات المناسبة
مثلا
text1
ضع مكانها اسم التكست الأول في العملية
text2
ضع مكانها اسم التكست الثاني
text3
ضع مكانها اسم التكست الذي توضع في النتيجة


RE: عملية حسابية بين تكست بوكس و ريتش بوكس - MCPD - 30-12-13

اكيد غيرتها
جرب عندك او ارفق مثال اذا سمحت وشكرا


RE: عملية حسابية بين تكست بوكس و ريتش بوكس - Easy4ever - 30-12-13

أخي الكريم كود الاخ mamas1
صحيح 100%
المشكله هي انك وضعت الكود في مكان الخطأ
وضعتها بعد ما يقوم بمسح التكس بوكس الاول والثاني
حتى تعمل الكود بشكل صحيح يجب اختيار موقع الكود الصحيح
وهو قبل عملية مسح التكس بوكس الأول والثاني


بالتوفيق اخي الكريم


RE: عملية حسابية بين تكست بوكس و ريتش بوكس - البروف سيمونس - 30-12-13

(30-12-13, 04:49 PM)MCPD كتب : اريد الان ان كل ما اكتبه فى التكست بوكس يكتب تلقائيا فى الريتش بوكس
وبعد كل عملية حسابية ينزل سطر فى الريتش بوكس
هكذا
2*3=12
5*5 = 25
6*3=16
طبعا هذه الارقام مأخوذة من التكست بوكس وعند الظغط على انتر لتنفيذ عملية حسابية جديدة ينزل سطر فى الريتش بوكس وينفذ امر الضرب الى فى التكست بوكس
وشكر جزيلا
وعليكم السلام ، اهلا بك عزيزي ، هل تقصد بما في الصورة التالية ؟


إن كان ما تريده هكذا ، فإليك المثال بالمرفقات .
وهذا الكود أيضاً :
PHP كود :
If RadioButton1.Checked True Then
            TextBox3
.Text Val(TextBox1.Text) + Val(TextBox2.Text)
            
RichTextBox1.Text RichTextBox1.Text TextBox1.Text "+" TextBox2.Text "=" TextBox3.Text vbCrLf
        
ElseIf RadioButton2.Checked True Then
            TextBox3
.Text Val(TextBox1.Text) - Val(TextBox2.Text)
            
RichTextBox1.Text RichTextBox1.Text TextBox1.Text "-" TextBox2.Text "=" TextBox3.Text vbCrLf
        
ElseIf RadioButton3.Checked True Then
            TextBox3
.Text Val(TextBox1.Text) / Val(TextBox2.Text)
            
RichTextBox1.Text RichTextBox1.Text TextBox1.Text "/" TextBox2.Text "=" TextBox3.Text vbCrLf
        
ElseIf RadioButton4.Checked True Then
            TextBox3
.Text Val(TextBox1.Text) * Val(TextBox2.Text)
            
RichTextBox1.Text RichTextBox1.Text TextBox1.Text "×" TextBox2.Text "=" TextBox3.Text vbCrLf
        End 
If 
تحياتي .


RE: عملية حسابية بين تكست بوكس و ريتش بوكس - MCPD - 31-12-13

شكرا لكم جميعا

الكود اشتغل

المشكلة كانت عندى انا لما كنت بعطى للتكست بوكس بعد الكود = ""
خليتها قبل الكود واشتغل تمام

اكرر شكرى لكم


RE: عملية حسابية بين تكست بوكس و ريتش بوكس - Abu Ehab - 31-12-13

يعطيكم العافية ,,,, لكن للمعـــــــــلومة شباب :
لما تكون عايز تجمع أرقام موجوده في كنترول مثل التكست ,,, وهذة الأرقام يتم ادخالها يدوي من المستخدم ,,,
لازم تاخد بالك من كثير أمور ,,,

أنت لازم تتوقع أن المستخدم يدخل رموز
تانيا : لازم تحول المدخلات حتى لو كانت المدخلات رقمية أو كسريه و ذلك بأستخدام CInt CDbl
تالتا : أبعـــــــــد عن أستخدام جملة If وبدل منها أستخدم Select Case
أو ممكن بالــــــــ LINQ تعمل كل شيئ بسهولة
وشغلة تانية :
هي اللغة أساسا بتقدم لكن مكتبة خاصة لهذة الأمور System.Math