[حريف برمجة]

وعليكم السلام ،،

كود :

For Each s As String In TextBox1.Text
    s = Regex.Replace(s, "[أإآا]", "[أإآا]")
    s = Regex.Replace(s, "[هة]", "[هة]")
    s = Regex.Replace(s, "[ىي]", "[ىي]")
    s = Regex.Replace(s, "[وؤ]", "[وؤ]")
  txt &= s
SQL = "select * from tpl1 where Description like '%" & txt & "%'"
Next