منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
خطأ فظيع في كود الtextbox المستخدم - نسخة قابلة للطباعة

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



خطأ فظيع في كود الtextbox المستخدم - BlackEagleSA - 18-11-12

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

وكتبت فيه كتبت غلط في يعني زودت رقم فيه ولمن جيت أمسح مو راضي يخليني أستخدم زر الback space أو السهم حق الحذف

يعني يا اني استخدم الديليت بعد التحديد يا مافي حل

هذا هو الكود وطبعاً الشباب اللي هنا عطوني ياه الله يعطيهم العافية ايش الشيء اللي لازم أضيفه علشان يزبط الكود

كود :
If e.KeyChar < "0"c Or e.KeyChar > "9"c Or e.KeyChar = "-"c Or e.KeyChar = "."c Then
            e.Handled = True


وياريت تساعدوني لأني مستعجل عليها

شاكراً لكم جهودكم الرائعة ......


خطأ فظيع في كود الtextbox المستخدم - amgadtamer - 18-11-12

استبدل كودك بهذا الكود

PHP كود :
Dim numericinput As String "0123456789"
        
If e.KeyChar <> ControlChars.Back Then
            
If numericinput.IndexOf(e.KeyChar) = True Then
                e
.Handled True
            End 
If
        
End If 



خطأ فظيع في كود الtextbox المستخدم - SaLoOoMX - 21-11-12

كود :
If Char.IsControl(e.KeyChar) = False Then
            If Char.IsDigit(e.KeyChar) Then
            Else
                e.Handled = True
            End If

        End If

تفضل الكود الاخر