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

السلام عليكم


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


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

وشكرا

انت مخير بين عدة طرق منها التحقق هل المدخل ارقام ام لا بالكود isnumeric او ممكن تستخدم regex بالكود

(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

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