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