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

نسخة كاملة : كود منع ادخال ارقام او حروف داخل التيكست بوكس
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عيكم ورحمة الله وبركاته
اساتذتي الاكارم لدي مجموعة من التيكست بوكس كما موضح بالصورة المرفقة هل من الممكن ان امنع ادخال حروف او ارقام عربي او انكليزي داخلهم بكود واحد
تحياتي للجميع
وعليكم السلام ورحمة الله وبركاته
اولا الكود يجب ان يكون في حدث 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
الف شكر اخي الغالي الله يرحم والديك ويجعل عملك هذا جواز سفرك انت ووالديك وممن تحب الى الجنةامين يارب العالمين