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

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة السي شارب C#.NET (http://vb4arb.com/vb/forumdisplay.php?fid=175)
+--- قسم : قسم اسئلة C#.NET (http://vb4arb.com/vb/forumdisplay.php?fid=176)
+--- الموضوع : [Acces2007] كود تقريب اقرب 10 للاعلى accas (/showthread.php?tid=31229)



كود تقريب اقرب 10 للاعلى accas - mohnad - 05-09-19

مرحبا   لدي برنامج acces ضرائب يجبر فيه المبلغ لاقرب ليرة اريد تعديل التقريب الى اقرب 10 ليرات  للاعلى
مثال :  2945        2950
           2991          3000
           40566        40570
           
وكم الشكر والاحترام


RE: كود تقريب اقرب 10 للاعلى accas - ابراهيم ايبو - 06-09-19

السلام عليكم اخي الكريم
تفضل هذا الكود الاولى
كود :
private void button1_Click(object sender, EventArgs e)
       {
           double aa;
           aa = double.Parse(textBox1.Text);
         
           char[] ch = textBox1.Text.ToCharArray();
           char lst=ch[ch.Length-1];
           var result = (int)(Math.Ceiling(aa) +10-(int.Parse(lst.ToString())));
           textBox2.Text = result.ToString();
       }

وان احببت جبر الفاصلة  فقط اليك هذا الكود
كود :
private void button1_Click(object sender, EventArgs e)
       {
           double aa;
           aa = double.Parse(textBox1.Text);
           
           var result = (int)(Math.Ceiling(aa) + 0.1);
           textBox2.Text = result.ToString();
       }