من با وی بی 6 یه برنامه قرآن با 6 ترجمه نوشتم. برای جست و جو در اول برنامه بغیر از داشتن متن اصلی قرآن یه متن بدون اعراب هم در رم گرفتم.
من از پایگاه های داده استفاده نمیکنم.
برنامه قرآن رو خط به خط (آیه به آیه) که می خوند یکی به آرایه ی اصلی میداد یکی هم با فانکشن زیر اعرابش رو برمیداشت و به آرایه ی بدون اعراب میداد.
شکل دات نتش:
Private Function Trim_O(ByVal i As String) As String
i.Replace("ً", "")
i.Replace("ُ", "")
i.Replace("ٍ", "")
i.Replace(",", "")
i.Replace("َ", "")
i.Replace("ِ", "")
i.Replace("ّ", "")
i.Replace("ء", "")
i.Replace("ْ", "")
i.Replace("ٌ", "")
i.Replace("آ", "ا")
i.Replace("إ", "ا")
i.Replace("أ", "ا")
i.Replace("ة", "ه")
Return i
End Function
بعد برای جست و جو تو آرایه ی بدون اعراب میگشت ولی جواب رو در آرایه ی با اعراب میداد.
برای این که کاربر با اعراب نوشت باز هم نتیجه بده میتونید فانکشن رو برای ورودی که از کاربر میگیرید هم استفاده کنید.
روش دیگه هم اینه که کلی این متن رو در حافظه رم یا هارد نریزید بلکه در خود جست و جو قبل از جست و جوی هر فیلد یه نمونه از اون فیلد گرفته و اون رو با فانکشن تمیز کنید و بعد توش بگردید.