مشکل جستجو در کد نویسی با حرف (ی)

سلام
این مشکل اغلب ناشی از استفاده از نسخه های غیر معتبر ویندوز و دستکاری شده است، هر چیزی طبیعی اش بهتر است!!!!
مثل همین MRT طرف برداشته ویندوز مایکروسافت را برای خودش سند زده؟!

شاید هم قبلاً این مشکل را داشتید، مثلاً دیتا بیسی در قدیم داشتید و حال که ویندوز را عوض کردی به مشکل برخوردید.
حدسم چطور است؟؟؟؟

از اینها که بگذریم، چندین کد Unicode بعضاً به حروف های مشابه/حالت اختصاص داده شده، و این مشکل وقتی پیش می آید که دو کاراکتر "ی" به ظاهر یک شکل هستند ولی در واقع دو کد Unicode متفاوت دارند (مثلاً هر ویندوزی برای خودش یک کدی زده)
بیشتر نسخه های اصل به ازای "ی" کیبورد کد 6CC برابر با 1740 مجموعه Unicode را تایپ میکنند.

اگر دیتابیس قدیمی دارید یا فایل متنی قدیمی دارید، یک راه ساده Replace تمام موارد قدیم با موارد جدید است.
دقت کنید که برای Replace مورد Replace جدید را باید با کیبورد تایپ کنید ولی "ی" ناسازگار قدیم را برای find شدن باید از داخل خود یکی از کاراکترهای خود متن Copy کنید و استفاده کنید.
امیدوارم متوجه شده باشید...

و اگر روش فوق را نخواستید باید هر دو حالت ممکن (یا n حالت) را در متغیر آرایه ای ذخیره داشته باشید و همه حالات را مقایسه کنید، مثل "ی" های زیر که همه "ی" هستند ولی کد Unicode متفاوتی دارند!!!!!!!!! :31:
(ولی اغلب همان دو "ی" قدیم و جدید را چک کنید کافیست)

کد:

Dim Ye() As Char = { "ی"c, "ۍ"c, "ێ"c, "ې"c, "ۑ"c, "ے"c, "ۓ"c, "ى"c, "ي"c, "ﮮ"c, "ﮯ"c, "ﮰ"c, "ﮱ"c, "ﯤ"c, "ﯥ"c, "ﯦ"c, "ﯧ"c, "ﯨ"c, "ﯩ"c, "ﯼ"c, "ﯽ"c, "ﯾ"c, "ﯿ"c, "ﺉ"c, "ﺊ"c, "ﺋ"c, "ﺌ"c, "ﻯ"c, "ﻰ"c, "ﻱ"c, "ﻲ"c, "ﻳ"c, "ﻴ"c}