[khairallah]

(01-06-19, 12:41 PM)ابراهيم ايبو كتب :

السلام عليكم اخي الكريم

تفضل هذا الكود الشطر الاول لتقريب الرقم والثاني لعدد الخانات بعد الفاصلة

كود :

' استخدم هذا الكود
       TextBox2.Text = String.Format("{0:0}", Val(TextBox1.Text)) ' أولا لتقريب العدد
       TextBox2.Text = FormatNumber(Val(TextBox2.Text), 3) 'ثم  عدد الاصفار بعد الفاصلة

الف شكر لاكن الرقم عندي ليس فيه فواصل انما على الشكل التالي 175550250 اريد تحويل كسر الالف الى الف 175551000 مع كل التقدير