منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[سؤال] كيف منع كتابة الاحرف في التكست بوكس - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (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=4022)

كيف منع كتابة الاحرف في التكست بوكس - hassan - 12-10-14

السلام عليكم


مثل ما موضح في العنوان


اابغا كود او طريقة منع كتابة الاحرف 

وشكرا

RE: كيف منع كتابة الاحرف في التكست بوكس - سعود - 12-10-14

انت مخير بين عدة طرق منها التحقق هل المدخل ارقام ام لا بالكود isnumeric او ممكن تستخدم regex بالكود
كود :
Dim reg As New Regex("^[0-9]*$")
        If reg.IsMatch(TextBox1.Text.Trim) = False Then
            MsgBox("المدخل ليس ارقام", MsgBoxStyle.Critical, "")
        Else
            MsgBox("تمام ارقام", MsgBoxStyle.Information, "")
        End If


RE: كيف منع كتابة الاحرف في التكست بوكس - hassan - 12-10-14

(12-10-14, 08:23 AM)سعود كتب : انت مخير بين عدة طرق منها التحقق هل المدخل ارقام ام لا بالكود isnumeric او ممكن تستخدم regex بالكود

كود :
       Dim reg As New Regex("^[0-9]*$")
       If reg.IsMatch(TextBox1.Text.Trim) = False Then
           MsgBox("المدخل ليس ارقام", MsgBoxStyle.Critical, "")
       Else
           MsgBox("تمام ارقام", MsgBoxStyle.Information, "")
       End If

الله يعطيك العافيه