منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
سؤال لاساتذتنا الكرام اريد طريقة لاستبدال النقطة "." بالفاصلة "," . - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : سؤال لاساتذتنا الكرام اريد طريقة لاستبدال النقطة "." بالفاصلة "," . (/showthread.php?tid=25238)

سؤال لاساتذتنا الكرام اريد طريقة لاستبدال النقطة "." بالفاصلة "," . - kalammoufid - 05-06-18

السلام عليكم و رحمة الله تعالى . رمضان كريم للجميع

اريد طريقة لاستبدال النقطة "." بالفاصلة "," . وذلك عند ادخال اي رقم على الداتاقريدفيو. انا فعلا احتاج للطريقة و شكرا للجميع

RE: سؤال لاساتذتنا الكرام - HASAN6.0 - 05-06-18

PHP كود :
Private Sub DataGridView1_CellEndEdit(sender As Object, e As DataGridViewCellEventArgs) Handles DataGridView1.CellEndEdit
        If Not IsNothing(sender.CurrentCell.Value) Then
            sender.CurrentCell.Value = Replace(sender.CurrentCell.Value, ",", ".")
        End If
    End Sub 


RE: سؤال لاساتذتنا الكرام - kalammoufid - 05-06-18

(05-06-18, 01:29 PM)HASAN6.0 كتب :
PHP كود :
Private Sub DataGridView1_CellEndEdit(sender As Object, e As DataGridViewCellEventArgs) Handles DataGridView1.CellEndEdit
        If Not IsNothing(sender.CurrentCell.Value) Then
            sender.CurrentCell.Value = Replace(sender.CurrentCell.Value, ",", ".")
        End If
    End Sub 

شكرا شكرا شكرا . فعلا كنت منتضر هذه الاجابة . الكود شغال تمام التمام .