niño_morata 0 Newbie Poster

hi.! Im niño morata. Can you plz solve my problem. I have a assignment datagrid search..
when I click search command botton to my program...there is problem, but when I try to click a search command botton again the msgbox say that "no record found"

[ code of search command botton ]

1. Dim N As String
2. N = Inputbox (Combo1 & " search")
3. adodc1.Recordset.Find Combo1.List (Combo1.ListIndex " = " ' & N & ' " ' ")
4. if adodc1.Recordset.EOF Then
5. msgbox "no record found"
6. end if

can you plz add some code to my program....
thks :D