تحويل الرقم الموجود في التكست لفورمات معين

up

اهلا اخي

اضرب الرقم في 0.001

ورياضيا الصفر الاخير من كل الارقام لا يكتب

أشكرك أخي خيال و حب على التعاون

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

وشكرا جزيلا لك أخي على المشاركة والتعاون ...

وفي الانتظار....

اخي العزيز

جرب هذا الكود

ToString("00000000")

واكتب بين القوسين بدلا من الاصفار الفورمات التي تريدها

أخي خالد جزاك الله خير

ولكن الكود لايعمل تبشكل صحيح وهذه رسالة تظهر أثناء تشغيله

Unable to cast object of type 'System.String' to type 'System.IFormatProvider'.

واستخدامي له كان بوضع الكود التالي في زر

TextBox13.Text = TextBox13.Text.ToString("0.000")

أو

 TextBox13.Text.ToString("00.000")

وكان يظهر نفس الرسالة السابقة ...

وفي انتظاركم ..............

السلام عليكم

تفضل ياباشا وماتنساش الدعاوي :)

MsgBox(Format(CLng(TextBox1.Text), "##,#0"))

شكرا جزيلا أخي العزيز MEGREN ولكن ليس هذا الفورمات المطلوب حيث أنه يعطي فواصل الارقام فقط ...

ويكفي هذا الكود لعمل ذلك

textbox1.text=format(textbox1.text ,"0,000")

ولكن على العموم جزاك الله خيرا....

وشكرااا

وإياك إن شاء الله

لكن بخصوص الكود لا بد من تحويل النص لأرقام بإضافة clng

TextBox1.Text = Format(CLng(TextBox1.Text), "0,000")

وإلا أصبحت النتيجة دائما

"0,000"

طيب ما الهدف من وراء تلك التنسيقات فلو عرف السبب ربما نجد طريقة للوصول إلى المطلوب

ربما أن ما تريده لا يمكن ضمن التنسيقات ولكن قد نجد حله مع دوال أخرى مثل Mid وغيرها بواسطة الكود

يعني أخذ القيم وتنسيقها ثم إخراجها بالتنسيق الذي تريد