+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (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=35373)
الصفحات:
1
2
RE: كيف اجع من التاكست بوكس تعرض ارقام با فواصل - kiki - 27-06-20
وعليكم السلام ورحمة الله وبركاته
اذا كنت تريد التعامل مع textbox فكل ما عليك فعله التالى
كود :
Private Sub TextBox1_Validating(sender As Object, e As CancelEventArgs) Handles TextBox1.Validating
' السطر التالى اشبه بالتالى
' TextBox1.Text = TextBox1.Text / 100
TextBox1.Text /= 100
TextBox1.Text = FormatNumber(TextBox1.Text, 2)
End Subوبكده تكون تم تحويل الارقام العامة الى عملة مالية
يوجد اداء اخر هى مخصصة لهذا الامر اذا كنت تريد الاستخدام بدول كود وهى
MaskedTextBox
بالنهاية اذا كنت ستستخدم الكود بالاعلى حتى تتجنب اى اخطاء فاليك التالى
اولاً اجعل textbox لا يقبل الا ارقام فقط
ثانياً اجعل الكود بهذا الشكل
كود :
Private Sub TextBox1_Validating(sender As Object, e As CancelEventArgs) Handles TextBox1.Validating
If (String.IsNullOrEmpty(TextBox1.Text)) Then TextBox1.Text = 0
TextBox1.Text /= 100
TextBox1.Text = FormatNumber(TextBox1.Text, 2)
End Sub