منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : جعل textbox عدد صحيح وعددين عشريين فقط
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم ورحمة الله وبركاته 

لدي عمليه حسابيه والاجالي يكون بتكست بوكس ولاكن الرقم الي يطلع يكون العدد العشري كبير بمعنى 10.552000000000
اريد ان يكون بس عباره عن 10.55

الرجوا مساعدتي ولكم مني جزيل الشكر والتقدير وكل سنه وانتم طيبين
ما رايك بهذا:

CDbl
إضافة لما اقترحه أستاذنا العزيز " سعود " بارك الله فيه و له .. يمكن كذلك ..
كود :
   Private Sub TextBox1_TextChanged(sender As Object, e As EventArgs) Handles TextBox1.TextChanged
       TextBox3.Text = Val(TextBox1.Text) + Val(TextBox2.Text)
       TextBox3.Text = Format(Val(TextBox3.Text), "00.00")
   End Sub
   Private Sub TextBox2_TextChanged(sender As Object, e As EventArgs) Handles TextBox2.TextChanged
       TextBox3.Text = Val(TextBox1.Text) + Val(TextBox2.Text)
       TextBox3.Text = Format(Val(TextBox3.Text), "00.00")
   End Sub

تحياتي
أخي مممكن ان تسخدم الدالة Math  وكما هو موضح
     TextBox1.Text = Math.Round(Val(Textbox1 .Text), 4) إذ يمثل الرقم (4) عدد المراتب العشرية التي ترغب في اظهارها ...
(04-06-19, 10:19 PM)احمد نعمة السلامي كتب : [ -> ]أخي مممكن ان تسخدم الدالة Math  وكما هو موضح
     TextBox1.Text = Math.Round(Val(Textbox1 .Text), 4) إذ يمثل الرقم (4) عدد المراتب العشرية التي ترغب في اظهارها ...


عيد فطر مبارك و سعيد أخي الكريم و عمر مديد ..

الرّجاء أخي الكريم عدم استعمال الدالة Round بمثل هذه الحالات حسب سؤال السائل .. لأنّها ستقوم بالتقريب إلى أكبر عدد طبيعي .. و هذا خطأ .. مثلا 16.99 ستكون النتيجة بهذه الدالة 17 ..
تحياتي