Private Sub Text3_Change()
List1.Clear
strsearch = "SELECT * FROM [agafim]" _
       & " WHERE [rspon_first_name] LIKE '*" & Text3.Text & "*'"


 Set rs = db.OpenRecordset(strsearch)


 If rs.RecordCount > 0 Then
 For i = 0 To rs.RecordCount - 1
 f_name = rs![rspon_first_name]
 List1.AddItem f_name + " " + rs![rspon_last_name]
 Next i
Else
MsgBox ("NO RESULSTS")
End If

End Sub

יש לי בעיה עם הקוד הזה. למשל: אני לוחץ "נ" אז הוא משום מה מוצא לי רק "נועה" למרות שהוא אמור גם למצוא "נמרוד" או "נאור"..

זה ממש דחוף! זה לפרויקט שלי במחשבים.

אז אשמח אם מישהו יבין מה הבעיה ויעזור לי..תודה!!

נ.ב

לא מצאתי איך עושים code בהודעה הזאת..

** נערך **

עכשיו יש קוד

ב SQL לא רושמים כוכבית לחיפוש כולל אלא %, כלומר:

select * from table where user like '%נ%'

 For i = 0 To rs.RecordCount - 1
 f_name = rs![rspon_first_name]
 List1.AddItem f_name + " " + rs![rspon_last_name]
 Next i

מה אתה עושה פה ?

אם המכונה מצאה לך 3 התאמות לדוגמא כמו שאמרת עם "נועה" , הוא יכניס את אותה "נועה" 3 פעמים

אתה לא מתקדם ברשומות אתה נשאר כל הריצה על אותה רשומה

תעבוד עם לולאת while ולא for ובתוך הלולאה תקדם את הרשומה כדי להתקדם בכל התוצאות חיפוש ע"י מתודה FindNext