با سلام
من وقتي در بانك اطلاعاتي با حروف ك و ي جستجو مي كنم هيچ چيزي نمايس نمي ده مي خواستم بدونم كد جستجوي من مشكل داره و يا اگر راه حلي است دوستان راهنمايي كنن ممنون مي شم.
Private Sub Text1_Change()
On Error Resume Next
If Text1.Text = "" Then
Adodc1.Refresh
Else
Adodc1.Recordset.Filter = "DESC =' " + Text1.Text + " ' "
Adodc1.Recordset.Filter = " DESC like '" & Text1.Text & "*'"
End If
End Sub