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

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

منع الاحرف في التكست بوكس - DOX.1 - 27-04-20

محتاج كود يمنع الاحرف والرموز فقط ارقام بالتكست بوكس 
بستثناء زر المسح وزر الانتر 
وكل عام وانتو بخير

RE: منع الاحرف في التكست بوكس - سامي محمد - 27-04-20

كود :
 Private Sub TextBox1_KeyPress(sender As Object, e As KeyPressEventArgs) Handles TextBox1.KeyPress
        e.Handled = Not System.Text.RegularExpressions.Regex.IsMatch(e.KeyChar, "[0-9]")
    End Sub


RE: منع الاحرف في التكست بوكس - DOX.1 - 27-04-20

(27-04-20, 01:17 AM)سامي محمد كتب :
كود :
 Private Sub TextBox1_KeyPress(sender As Object, e As KeyPressEventArgs) Handles TextBox1.KeyPress
        e.Handled = Not System.Text.RegularExpressions.Regex.IsMatch(e.KeyChar, "[0-9]")
    End Sub

مليون ششششششكر سومة