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

نسخة كاملة : التمييز بين الـ يـ والـ ي
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم ورحمة الله وبركاتة

اخواني الافاضل ،، انا الان لدي تيكست بوكس

اريد التحقق من وجود حروف معينه و استبدالها


بمعنى انا الان اقوم بإستبدال الـ أ إلى ا

واريد إستبدال الـ ي إلى ى

فإستخدمت هذا الكود
كود :
Dim aString As String = Replace(TextBox3.Text, "أ", "ا")
        Dim aString4 As String = Replace(aString, "ي ", "ى ")


وفعلاً لو كتبت " علي " سيتم تحويلها إلى " على " ..

ولكن المشكلة انه يقوم ايضاً بتحويل ( شيماء ) إلى ( شىماء )

انا اريده ان يفرق بين الياء فى نهاية الكلمة ،، و الياء فى نص الكلمة ويحول الى موجوده فى اخر الكلمه فقط


هل هذا ممكن ؟

وشكرا لكم
السلام عليكم
الحل فى وضع مسطره فراغ بحيث يفرق بين الحرف الى فى وسط الكلمة والى فى اخرها او اولها

مثال
PHP كود :
Dim aString As String TextBox3.Text.Replace(" ا"" أ")
        
Dim aString4 As String aString.Replace("ى ""ي "
(11-10-13, 10:12 AM)ali.alfoly كتب : [ -> ]السلام عليكم
الحل فى وضع مسطره فراغ بحيث يفرق بين الحرف الى فى وسط الكلمة والى فى اخرها او اولها

مثال
PHP كود :
Dim aString As String TextBox3.Text.Replace(" ا"" أ")
        
Dim aString4 As String aString.Replace("ى ""ي "


اولا شكرا لك على المساعده ،، بارك الله فيك

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

لنفترض إني جعلته يحول "ي " إلى "ى" لاحظ المسافه

ماذا لو كانت الـ "ي" اخر كلمه فى الجمله ،، ولم يتم وضع مسافه ؟

لن يقوم بإستبدالها للاسف

السلام عليكم

جزاكم الله خيرا ،، تم حل المشكلة

وهي بوضع مسافه إجبارية فى نهاية الـتيكست بوكس و بعد ذلك إستخدام كود الاخ علي بالاعلى

TextBox3.Text = TextBox3.Text + " "
و عليكم السلام و رحمة الله
شوف هذا الموضوع ممكن يساعدك
إضغط هنا
بالتوفيق لك