sort a field in listview items by letter by letter entered in textbox txtsearch

[WoF]

Change to

rs.Open "Select * from accreg where Title like '" & txtsearch.text & "%'", db, 3, 3

I'm not quite sure, but I think there are some spaces required, at least between "like" and the searchtext, also after Select, I think.
Try this line and tell us if it works any better.