[Mido9]

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

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

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


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

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

فإستخدمت هذا الكود

كود :

Dim aString As String = Replace(TextBox3.Text, "أ", "ا")
        Dim aString4 As String = Replace(aString, "ي ", "ى ")

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

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

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


هل هذا ممكن ؟

وشكرا لكم