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

نسخة كاملة : formatage لرقم وفق شرط معين
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم ورحمة الله وبركاته 
أريد تغيير القيمة الرقمية التالية لهذا المبلغ  مثلا 244562,00
لتصبح على هذا الشكل من 13 رقما 
0000024456200
وبارك الله فيكم
وعليكم السلام ورحمة الله وبركاته

استخدم الكود 
كود :
       Dim num As Integer = "244562.00".Replace(".", Nothing)
       MsgBox(num.ToString("0000000000000"))

تحياتى لك
وتمنياتى لك التوفيق
بارك الله فيك أخي على الرد لكن عند تطبيقها على تكست بوكس بقيمة 
66125,83 يعطيني القيمة  0000000066126

كود :
Dim num As Integer = (textBoxAvg.Text).Replace(".", Nothing)
       MsgBox(num.ToString("0000000000000"))
حول علامة . الى ,
ليصبح الكود
كود :
      Dim num As Integer = textBoxAvg.Text.Replace(",", Nothing)
      MsgBox(num.ToString("0000000000000"))

او يفضل ان يكون بهذا الشكل
كود :
      Dim num As String = textBoxAvg.Text.Replace(",", Nothing)
      MsgBox(Val(num).ToString("0000000000000"))

تحياتى لك
وتمنياتى لك التوفيق
السلام عليكم وبركاته وشكرا لكم على الرد الكود شغال على التكست بوكس
لدي سؤال أخر 

كيف يمكنني توظيف هذه العملية على خلية cell معينة من الداتاقريد فيو  مثلا الخلية 4
وبارك الله فيكم
وعليكم السلام ورحمة الله وبركاته

الشكر لله والحمد لله
والحمد لله على كل حال

بخصوص خلية الداتا جريد
فقط سيكون على هذا النحو
كود :
     Dim num As String = DataGridView1.Rows(0).Cell(4).Value().Replace(",", Nothing)
     MsgBox(Val(num).ToString("0000000000000"))

ما تغيير رقم 0 الى رقم السطر المطلوب جلب منه بيانات الخلية

تحياتى لك
وتمنياتى لك التوفيق
شكرا لك أخي على الرد عند تجربة الكود يظهر رسالة الخطأ
cell is not member of system.windows.forms.datagridviewrow
الشكر لله والحمد لله
والحمد لله على كل حال

عفواً اخى الحبيب بسبب سهواً
تم نسيان وضع حرف S بكلمة Cell بالكود
لتصبح الكلمة Cells ولهذا يظهر معك الخطاء

والسهو فى الكتابة وانا اكتب الكود لك هنا

الكود
كود :
    Dim num As String = DataGridView1.Rows(0).Cells(4).Value().Replace(",", Nothing)
    MsgBox(Val(num).ToString("0000000000000"))

تحياتى لك
وتمنياتى لك التوفيق