تقييم الموضوع :
  • 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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] سلام سؤال تحويل رابط حاتمي 5 105 16-05-19, 02:29 PM
آخر رد: elgokr
  خطأ أثناء عملية البحث في DATAGRIDVIEW ahmedfa71 5 71 14-05-19, 04:10 PM
آخر رد: elgokr
  حفظ الصورة بعد عملية السكنر محمد خيري 7 102 10-05-19, 11:14 PM
آخر رد: asemshahen5
  سؤال بخصوص نقل بيانات faysal13_13@hotmail.com 1 89 27-04-19, 10:32 PM
آخر رد: saoud2
  [VB.NET] سؤال بخصوص فتح الشاشات khalid475 3 99 25-04-19, 09:18 PM
آخر رد: elgokr
  [VB.NET] سؤال بخصوص datetimepicker في الداتا جريد فيو jassim316 7 162 25-04-19, 09:28 AM
آخر رد: elgokr
  [VB.NET] سؤال بخصوص client server dubai.eig 3 101 23-04-19, 11:40 AM
آخر رد: elgokr
  خطأ في عملية حفظ محتوى datagridview إلى جدول من قاعدة البيانات ahmedfa71 7 126 23-04-19, 02:17 AM
آخر رد: elgokr
  سؤال حول تنسيق لون مربع نص المتألق9 3 108 19-04-19, 02:31 AM
آخر رد: المتألق9
  [نقاش] سؤال محير جداااااا وارجو المساعده faysal13_13@hotmail.com 6 135 18-04-19, 11:52 AM
آخر رد: اسامه الهرماوي

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


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