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

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



أريد كود لحقل النص - حكمت سعيد - 23-10-14

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


RE: أريد كود لحقل النص - vbnet - 23-10-14

.....

لقبول الأحرف فقط
كود :
Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As KeyPressEventArgs) Handles TextBox1.KeyPress
    If Not (Char.IsLetter(e.KeyChar) Or Char.IsWhiteSpace(e.KeyChar) Or Char.IsControl(e.KeyChar)) Then e.Handled = True
End Sub

.....