تقييم الموضوع :
  • 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 خانة
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  ارجوا المساعدة في برنامج محاسبة فيجوال بيسك 2008 محمد بوقزاحة 4 92 13-01-17, 12:56 AM
آخر رد: مساعدة
  [VB.NET] المساعدة في الاكواد لبرنامج انتي فايرس 0theghost0 6 107 11-01-17, 11:08 PM
آخر رد: 0theghost0
  [VB.NET] الرجاء المساعدة noway 2 82 10-01-17, 09:28 AM
آخر رد: thevirus
  [VB.NET] لدي فكرة مشروع لمن يريد المساعدة فاليتفضل 0theghost0 10 264 05-01-17, 05:15 PM
آخر رد: 0theghost0
  .سؤال محيرني.. محمد 2017 4 151 25-12-16, 10:02 PM
آخر رد: محمد 2017
  طباعة صورة PictureBox1 بعرض الصفحة .. أرجو المساعدة ahmed_elwerfalli 3 134 24-12-16, 05:59 PM
آخر رد: ahmed_elwerfalli
Thumbs Up برنامج إدارة الجمعيات الخيرية مفتوح المصدر... الرجاء المساعدة Arabia 46 1,802 11-12-16, 12:57 AM
آخر رد: tryold
  ارجو المساعدة في كود VB.NET 7 151 16-11-16, 03:20 AM
آخر رد: أبو عمر
Exclamation الرجاء المساعدة : كيف اخفى او اشفر كلمة السر لقاعدة بيانات من ملف App.config noway 2 124 28-10-16, 07:58 PM
آخر رد: noway
Lightbulb المساعدة في معرفة طريقة كتابة الأكواد بشكل صحيح ... Arabia 0 100 26-10-16, 03:18 PM
آخر رد: Arabia

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


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