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

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



السلام عليكم .... ارجوا المساعدة في الجمع التكست بوكس - محمد بوقزاحة - 05-02-17

انا عندي مشكلة في الجمع ارجوا المساعدة في الطريقة محاسبية مثلاً 1,500.500 + 1,000.500 =  2
الصحيح  هو  2,501.000  ارجوا المساعدة مثل مرفق ارجوا التعديل عليه 
وجزاكم الله كل خير


RE: السلام عليكم .... ارجوا المساعدة في الجمع التكست بوكس - ابو ليلى - 05-02-17

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

يا اخ محمد لايوجد نوع رقمي يستوعب مثل هذه الادخالات (هو مجرد تنسيق فقط)
انظر للمثال التالي و جرب ما فيه

PHP كود :
       Dim b As Double 1500.5
        Dim a 
As Double 1000.5

        Dim N 
As Double b

        TextBox1
.Text String.Format("{0:#,##0.00}"N
PHP كود :
       Dim b As Double 1500500
        Dim a 
As Double 1000500

        Dim N 
As Double b

        TextBox1
.Text String.Format("{0:#,##0.}"N



RE: السلام عليكم .... ارجوا المساعدة في الجمع التكست بوكس - محمد بوقزاحة - 05-02-17

بارك الله فيك وجزاك كل خير


RE: السلام عليكم .... ارجوا المساعدة في الجمع التكست بوكس - عبد الرحمن - 05-02-17

شوف ياخوي اول شي مثل ما قال خوينا ابوليلي ثاني شي ممكن حلها بحذف الفاصلة من النص قبل الجمع مثل
لو كانت في مربعات نص والناتج تبيه في مربع نص ثالث
dim a=val(textbox1.text.replace( ",",""))
dim b=val(texttox2.text.replace(",","") )
textbox3.text=formatnumber((a+b), 3)

لكن افضل شي انك تجمع الارقام الاصليه


RE: السلام عليكم .... ارجوا المساعدة في الجمع التكست بوكس - محمد بوقزاحة - 06-02-17

السلام عليكم اخي بارك الله فيك وجزاك الله الخير
اخي مشروعي انا محاسبي ويلزم عند الكتابة الرقم في التكست بوكس وعند ترك التكست بوكس يظهر بهذا الشكل 17,548.124 ( خانة آلاف .. خانة عشرات .... خانة مئات )


RE: السلام عليكم .... ارجوا المساعدة في الجمع التكست بوكس - sendbad100 - 06-02-17

(06-02-17, 11:25 AM)محمد بوقزاحة كتب : السلام عليكم اخي بارك الله فيك  وجزاك الله الخير
اخي مشروعي انا محاسبي ويلزم عند الكتابة الرقم في التكست بوكس وعند ترك التكست بوكس يظهر بهذا الشكل 17,548.124   ( خانة آلاف ..  خانة عشرات .... خانة مئات )

يمكن عمل  متغير تحفظ فيه الرقم  الاصلي 

او textbox مخفي  

والله الموفق


RE: السلام عليكم .... ارجوا المساعدة في الجمع التكست بوكس - محمد بوقزاحة - 07-02-17

ممكن توضح اكثر


RE: السلام عليكم .... ارجوا المساعدة في الجمع التكست بوكس - sendbad100 - 07-02-17

(07-02-17, 11:28 AM)محمد بوقزاحة كتب : ممكن توضح اكثر

ممكن تعلن عن متغيرات على مستوى الفورم  

كود :
Dim a As Double =0


قبل عمل سطر الفورمات  اسند الرقم الى المتغير  وعند الجمع او الضرب تعامل مع المتغير فقط


RE: السلام عليكم .... ارجوا المساعدة في الجمع التكست بوكس - محمد بوقزاحة - 08-02-17

ممكن اخي توضح بمثال
جزااك الله خير