تقييم الموضوع :
  • 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 ك ب / التحميلات : 11)
الرد
تم الشكر بواسطة:
#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] عملية البيع عبدالرحمن بشري عمر 4 103 20-02-19, 06:08 PM
آخر رد: elgokr
  سؤال في الفورم الذي يظهر فيه التقرير Emam emam 2 48 17-02-19, 03:59 PM
آخر رد: Emam emam
  [سؤال] رسالة خطأ بعد عملية الاضافة georgos 11 176 16-02-19, 03:36 PM
آخر رد: georgos
  سؤال فى صفوف الداتا جريد فيو احمد خطاب 1 78 07-02-19, 03:51 AM
آخر رد: حريف برمجة
Question [سؤال] تعبئة TreeView مع جود اكثر من عملية بحث ادخل جدوالين alims 0 51 06-02-19, 11:58 PM
آخر رد: alims
  [كود] سؤال لأهل الخبرة كيف يمكن استدعاء شااشة لبرنامج تم برمجتة بالجافا dametucorazon 1 89 06-02-19, 10:35 AM
آخر رد: dametucorazon
  سؤال حول امر الطباعة الفورية Osama Bayoumy 6 599 02-02-19, 01:08 PM
آخر رد: atef_020
  سؤال BackgroundWorker new_programer 5 206 23-01-19, 06:50 PM
آخر رد: %Eman%
  سؤال بخصوص تشيك ليست بوكس نور الهدى الهدى 3 144 22-01-19, 07:51 AM
آخر رد: حريف برمجة
  سؤال في تغيير قيمة الخلية sofiane-phy 3 151 16-01-19, 11:09 PM
آخر رد: sofiane-phy

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


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