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

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

الصفحات: 1 2

كود يسمح لك بكتابة احرف فقط في التيكست بوكس - honest - 24-10-14

السلام عليكم  اعضاء المنتدى الكرام

هذا كود يسمح لك بكتابة احرف فقط في التيكست بوكس ولا يمكنك من كتابة ارقام

كود :
   Private Sub TextBox1_KeyPress(sender As Object, e As KeyPressEventArgs) Handles TextBox1.KeyPress
       Select Case e.KeyChar
           Case "ء" To "ي", "A" To "z", ControlChars.Back, Chr(Keys.Space)
               e.Handled = False
           Case Else
               e.Handled = True
       End Select
   End Sub

وهذا يسمح لك بكتابة ارقام فقط آي عكس الكود السابق

كود :
   Private Sub TextBox4_KeyPress(sender As Object, e As KeyPressEventArgs) Handles TextBox4.KeyPress
       Select Case e.KeyChar
           Case "0" To "9", ControlChars.Back, Chr(Keys.Space)
               e.Handled = False
           Case Else
               e.Handled = True
       End Select
   End Sub

وهذا يسمح بكتابة احرف عربية فقط

كود :
  Private Sub TextBox2_KeyPress(sender As Object, e As KeyPressEventArgs) Handles TextBox2.KeyPress
       Select Case e.KeyChar
           Case "ء" To "ي", ControlChars.Back, Chr(Keys.Space)
               e.Handled = False
           Case Else
               e.Handled = True
       End Select
   End Sub

وهذا يسمح بكتابة احرف انجليزية فقط

كود :
  Private Sub TextBox3_KeyPress(sender As Object, e As KeyPressEventArgs) Handles TextBox3.KeyPress
       Select Case e.KeyChar
           Case "A" To "z", ControlChars.Back, Chr(Keys.Space)
               e.Handled = False
           Case Else
               e.Handled = True
       End Select
   End Sub


وهذا المشروع في المرفقات

RE: كود يسمح لك بكتابة احرف فقط في التيكست بوكس - vb_net - 24-10-14

ممتاز اخي الف شكر

RE: كود يسمح لك بكتابة احرف فقط في التيكست بوكس - honest - 25-10-14

لاشكرا على واجب

RE: كود يسمح لك بكتابة احرف فقط في التيكست بوكس - honest - 01-11-14

لماذا السلبية مشاهدات كثيرة ولا تعليق

RE: كود يسمح لك بكتابة احرف فقط في التيكست بوكس - abulayth - 01-11-14

ارضاء الناس غاية لا تدرك

يعطيك العافية

RE: كود يسمح لك بكتابة احرف فقط في التيكست بوكس - الوليد ☺ - 01-11-14

السلام عليكم ورحمة الله

المشاهدات الكثيرة دليل على أهميه الموضوع كما في مواضيعك ومشاركاتك التي أتابعها باهتمام

بارك الله فيك، وننتظر المزيد من الأكواد المفيدة

RE: كود يسمح لك بكتابة احرف فقط في التيكست بوكس - honest - 04-11-14

حاضر لكن اعذروني لزحمة العمل
انا اعمل في التجارة واريد ان اكوّن شركة تسويق خاصة بي لذلك اتأخر على هذا المنتدى الرائع

RE: كود يسمح لك بكتابة احرف فقط في التيكست بوكس - lolo queen - 23-08-15

شطرا أخي وجزاك الله الف خير

RE: كود يسمح لك بكتابة احرف فقط في التيكست بوكس - ahmedmahrm - 13-01-16

شكرا جزيلا

RE: كود يسمح لك بكتابة احرف فقط في التيكست بوكس - honest - 29-04-16

بارك الله فيكم والعفو للجميع