تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
كود جمع محيرني رجاء المساعدة
#1
لدينا فورم به عدد 2 تكست بوكس  
كنت اريد اذا تم كتابة عدد مثلا 123
التكست الثاني يجمع العدد 6  
او مثلا 777 = 21 هكذا






الرد }}}}
تم الشكر بواسطة:
#2
كود :
   
        Dim m As Integer = 0
        For Each n In TextBox1.Text
            m += Val(n)
        Next
        TextBox2.Text = m
ارجو يكون المطلوب
كل مااعرفه في البرمجة تجدونه هنا
الرد }}}}
تم الشكر بواسطة:
#3
تفضل اخي العزيز ارجو ن يكون هذا هو المطلوب
كود :
      Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click

            Dim I As Integer
            Dim X As Integer
            X = 0
            For I = 1 To Len(TextBox1.Text)
                  X = X + Val(Mid(TextBox1.Text, I, 1))
            Next
            TextBox2.Text = X
      End Sub
الرد }}}}
تم الشكر بواسطة: سعود
#4
اخي سعود واخي محمد العبيدي
الف الف شكر الكود يعمل بنجاح
سلمتم من كل سؤ وجزاكم الله الف خير

======================================

لي طلب اخير ولكم جزيل الشكر
هل من حل للاعداد الطويلة لانها يخرج مع الاعداد حروف
مثل هذه الصورة

الرد }}}}
تم الشكر بواسطة: سعود
#5
مافهمت عليك اخوي
هل تقصد انك تريد تجربة الكود على ماهو ظاهر بالصورة؟؟؟
كل مااعرفه في البرمجة تجدونه هنا
الرد }}}}
تم الشكر بواسطة:
#6
لا لا الكود تمام التمام جزاك الله الف خير

انا اقصد بعض العمليات الحسابية يوجد بها ارقام طويلة
ياتي بها حروف اريد عدم اظهار هذه الحروف لكي تظهر العملية الحسابية كاملة
الرد }}}}
تم الشكر بواسطة:
#7
ممكن تجيب مثال اطبق عليه؟
يعني عطني رقم واشوف له طريقة
كل مااعرفه في البرمجة تجدونه هنا
الرد }}}}
تم الشكر بواسطة:
#8
لو افترضنا لدينا عددين نريد نقوم بعملية ضرب هكذا
59716056 * 59716056 = 3.56600734419514E+15
خرج العدد النهائي لكن لاحظ اخر اربع اعداد خرج حرف  e+15
هل يوجد كود لاخراج عملية الضرب كاملة بدون هذه الحروف

وانا اسف اذا كنت اثقلت عليك
لكن انت كريم بن كريم جزاك الله الف خير
الرد }}}}
تم الشكر بواسطة:
#9
هذي حتى بالالة الحاسبة العادية تظهر
لكن جرب حاسبة الجهاز تلاحظ ان الكود جاب الرقم المقرب
كل مااعرفه في البرمجة تجدونه هنا
الرد }}}}
تم الشكر بواسطة:
#10
اخي العزيز وجدة السؤال التالي وقد تم الاجابة عليه من قبل السيد [b]Ahmed_Mansoor [/b]وهو شبيه لما تريده

عرض رقم 32/ 64 خانة
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  ارجو المساعدة وفقكم الله samawi 0 18 منذ 7 ساعة مضت
آخر رد: samawi
  المساعدة في كود الفلتر khaled12345 7 83 09-01-18, 12:49 AM
آخر رد: khaled12345
  المساعدة في كود البحث المتعدد khaled12345 3 112 07-01-18, 12:35 AM
آخر رد: khaled12345
  [VB.NET] برنامجي يتوقف علي كود الحذف رجاء من الخبراء محمد اسماعيل 3 97 06-01-18, 09:57 PM
آخر رد: محمد اسماعيل
  ارجو المساعدة في طباعة الفاتورة VB.NET 1 64 06-01-18, 04:42 AM
آخر رد: محمود صالح
  لو ممكن المساعدة في كود يسمح بعرض ملفات قاعدة البيانات في تكس بوكس لو لست بوكس silensieux2013 0 47 22-12-17, 04:42 PM
آخر رد: silensieux2013
  [سؤال] ارجو المساعدة في ارسال التقرير الي الايميل bdf mamba732 1 574 21-12-17, 12:20 AM
آخر رد: محمود صالح
  [VB.NET] المساعدة في تصحيح الكود MySqlConnection dubai.eig 6 148 12-12-17, 12:38 PM
آخر رد: dubai.eig
  الرجاء المساعدة حول ظهور الصور أحمد فتح الرحمن 2 78 11-12-17, 02:11 AM
آخر رد: أحمد فتح الرحمن
  [VB.NET] المساعدة في اضافة وحفظ بيانات الداتا جريد محمد اسماعيل 1 81 10-12-17, 10:16 PM
آخر رد: حريف برمجة

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم