[ابو نور الهدى]

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

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

تحياتي للجميع

[ابو انس]

وعليكم السلام ورحمة الله وبركاته
اولا الكود يجب ان يكون في حدث KeyPress للتيكست بوكس

مثال لمنع كتابة الاحرف العربية والانكليزية

كود :

If (e.KeyChar >= "a" And e.KeyChar <= "z") Or (e.KeyChar >= "A" And e.KeyChar <= "Z") Or (e.KeyChar >= "ا" And e.KeyChar <= "ي") Then
           e.Handled = True
       End If

مثال لمنع كتابة كل شيء الا الارقام والفاصلة

كود :

  If (e.KeyChar < "0" OrElse e.KeyChar > "9") AndAlso e.KeyChar <> ControlChars.Back AndAlso e.KeyChar <> "." AndAlso e.KeyChar <> "," Then
           e.Handled = True
       End If

مثال لمنع كتابة حرف واحد وهو في حالتنا حرف a  سمول

كود :

 If (e.KeyChar = "a") Then
           e.Handled = True
       End If

[ابو نور الهدى]

الف شكر اخي الغالي الله يرحم والديك ويجعل عملك هذا جواز سفرك انت ووالديك وممن تحب الى الجنةامين يارب العالمين