تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
سؤال عملية حسابية
#1
السلام عليكم.اخواني لو سمحتم النظر بالمثال
لماذا النتيجة باتاكست بكس رقم8 لا تطلع صحيحة عند قسمة التاكست رقم 7 على التاكست رقم3
اجمع التاكست 1 + التاكست بكس2 و النتيجة بأعداد طبيعية فقط تظهر بالتاكست 3
اجمع التاكست 4 + 5 +6 و النتيجة تطلع بالتاكست 7 بأعداد صحيحة
التاكست 8 يساوي التاكست 7 / التاكست 3
لكن اجد النتيجة بالتاكست8 غير صحيحة .بارك الله فيكم وين الغلط او كيف يمكن اجراء هذا العمليات


الملفات المرفقة
.rar   WindowsApplication1.rar (الحجم : 72.29 ك ب / التحميلات : 7)
الرد
تم الشكر بواسطة:
#2
اخي شكرا لكن الفواصل كثيرة لم افهم ماذا تقصد
الرد
تم الشكر بواسطة:
#3
الفواصل أتت بسبب Format "#,##0.00" من الكود
كود :
Public Class Form1

   Private Sub TextBox1_TextChanged(sender As Object, e As EventArgs) Handles TextBox1.TextChanged
       TextBox3.Text = Val(TextBox1.Text) + Val(TextBox2.Text)
   End Sub

   Private Sub TextBox2_TextChanged(sender As Object, e As EventArgs) Handles TextBox2.TextChanged
       TextBox3.Text = Val(TextBox1.Text) + Val(TextBox2.Text)
   End Sub

   Private Sub TextBox4_TextChanged(sender As Object, e As EventArgs) Handles TextBox4.TextChanged
       TextBox7.Text = Val(TextBox4.Text) + Val(TextBox5.Text) + Val(TextBox6.Text)
       TextBox7.Text = Val(TextBox7.Text)
   End Sub

   Private Sub TextBox5_TextChanged(sender As Object, e As EventArgs) Handles TextBox5.TextChanged
       TextBox7.Text = Val(TextBox4.Text) + Val(TextBox5.Text) + Val(TextBox6.Text)
       TextBox7.Text = Val(TextBox7.Text)
   End Sub

   Private Sub TextBox6_TextChanged(sender As Object, e As EventArgs) Handles TextBox6.TextChanged
       TextBox7.Text = Val(TextBox4.Text) + Val(TextBox5.Text) + Val(TextBox6.Text)
       TextBox7.Text = Val(TextBox7.Text)
   End Sub

   Private Sub TextBox7_TextChanged(sender As Object, e As EventArgs) Handles TextBox7.TextChanged
       TextBox8.Text = Val(TextBox7.Text) / Val(TextBox3.Text)
       TextBox8.Text = Val(TextBox8.Text)
   End Sub
End Class
الرد
تم الشكر بواسطة: محمد خيري , عبد العزيز البسكري
#4
بارك الله فيك اخي سؤال اخير لو سمحت كيف اضبط النتيجة بالتاكست 7 و التاكست 8 برقمين عشريين بعد الفاصلة يعني لو كانت النتيجة مثال 12345.789432555 تصبح فقط 12345.78
الرد
تم الشكر بواسطة:
#5
باستخدام ToString ثم 0.00
هذا مثال وقس عليه
كود :
TextBox8.Text = Val(TextBox8.Text).ToString("0.00")
الرد
#6
بارك الله فيك اخي و زادك من علمه و فضله وهو الذي ابحث عنه بالفعل يعطيك الصحة و العافية
الرد
تم الشكر بواسطة: elgokr


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] جمع قيمة اثناء عملية تحديث البيانات محمد اسماعيل 0 32 أمس, 07:32 PM
آخر رد: محمد اسماعيل
  [VB.NET] اضافة سريال لكل عملية محمد اسماعيل 4 114 أمس, 07:14 PM
آخر رد: محمد اسماعيل
  [VB.NET] سؤال اسيل1 2 87 13-12-18, 03:27 AM
آخر رد: trakktour
  سؤال فى بحث بالتاريخ احمد خطاب 4 88 12-12-18, 11:53 PM
آخر رد: احمد خطاب
  [VB.NET] بعد عملية التطوير من فيرجن قديم الى جديد 0theghost0 1 52 10-12-18, 02:47 PM
آخر رد: elgokr
  سؤال بخصوص البحث باستخدام التاريخ عن طريق WebService masry4u 3 79 08-12-18, 08:36 PM
آخر رد: masry4u
Heart سؤال عن حساب السن (العمر) عن طريق تاريخ الميلاد ahmadpal 10 185 07-12-18, 04:52 PM
آخر رد: ahmadpal
  سؤال بخصوص الكتابة داخل داتا جريد احمد خطاب 3 86 05-12-18, 11:35 AM
آخر رد: احمد خطاب
  [سؤال] طلب عملية حسابية motazsaad94@gmail.com 2 74 04-12-18, 11:30 PM
آخر رد: motazsaad94@gmail.com
  [VB.NET] سؤال عن الداتا جريد فيو M.SOFT 1 67 04-12-18, 04:31 AM
آخر رد: محمد كريّم

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


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