+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [سؤال] جعل textbox عدد صحيح وعددين عشريين فقط (/showthread.php?tid=29732)
جعل textbox عدد صحيح وعددين عشريين فقط - sabil_mart - 01-06-19
السلام عليكم ورحمة الله وبركاته
لدي عمليه حسابيه والاجالي يكون بتكست بوكس ولاكن الرقم الي يطلع يكون العدد العشري كبير بمعنى 10.552000000000
اريد ان يكون بس عباره عن 10.55
الرجوا مساعدتي ولكم مني جزيل الشكر والتقدير وكل سنه وانتم طيبين
RE: جعل textbox عدد صحيح وعددين عشريين فقط - سعود - 01-06-19
ما رايك بهذا:
CDbl
RE: جعل textbox عدد صحيح وعددين عشريين فقط - عبد العزيز البسكري - 01-06-19
إضافة لما اقترحه أستاذنا العزيز " سعود " بارك الله فيه و له .. يمكن كذلك ..
كود :
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تحياتي
RE: جعل textbox عدد صحيح وعددين عشريين فقط - احمد نعمة السلامي - 04-06-19
أخي مممكن ان تسخدم الدالة Math وكما هو موضح
TextBox1.Text = Math.Round(Val(Textbox1 .Text), 4) إذ يمثل الرقم (4) عدد المراتب العشرية التي ترغب في اظهارها ...
RE: جعل textbox عدد صحيح وعددين عشريين فقط - عبد العزيز البسكري - 05-06-19
(04-06-19, 10:19 PM)احمد نعمة السلامي كتب : أخي مممكن ان تسخدم الدالة Math وكما هو موضح
TextBox1.Text = Math.Round(Val(Textbox1 .Text), 4) إذ يمثل الرقم (4) عدد المراتب العشرية التي ترغب في اظهارها ...
عيد فطر مبارك و سعيد أخي الكريم و عمر مديد ..
الرّجاء أخي الكريم عدم استعمال الدالة Round بمثل هذه الحالات حسب سؤال السائل .. لأنّها ستقوم بالتقريب إلى أكبر عدد طبيعي .. و هذا خطأ .. مثلا 16.99 ستكون النتيجة بهذه الدالة 17 ..
تحياتي