تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] سؤال في تكست بوكس
#1
السلام عليكم ورحمه الله وبركاته
عندي تكست بوكس لأدخال نصوص فقط ولكن انا عملت كود في حدث key_press لمنع كتابه اي شي غير النصوص ال هو شامل الارقام أو اي علامات المهم انا عاوز كود عندما اقوم بعمل paste يقوم بتصفيته اي شي غير النصوص كيف اعملها ارجو المساعده وشكرا
الرد }}
تم الشكر بواسطة:
#2
استخدم حدث TextChanged و Regex.Replace لاستبدال اي شيء ليس بحرف عربي او انجليزي او مسافة بنص فارغ

كود :
   Private Sub TextBox1_TextChanged(sender As Object, e As EventArgs) Handles TextBox1.TextChanged
       Dim Txt As TextBox = sender
       Txt.Text = Regex.Replace(Txt.Text, "[^\u0621-\u064Aa-zA-Z\s]", "")
   End Sub


لا تنس 
كود :
Imports System.Text.RegularExpressions

المدي [^\u0621-\u064Aa-zA-Z\s] يمثل اي شيء لبس بحرف عربي ( في الامر تفصيل ) وكذلك ليس بحرف انجليزي ولا حرف مسافة ( مسافة عادية او TAB او سطر جديد )
الرد }}
تم الشكر بواسطة: سعود , حسن الجلب , حسن الجلب



التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم