Visual Basic - Problemas con sql

Dim midb As Database
Dim miws As Workspace
Dim mirs As Recordset
Dim NomABus As String

Set miws = DBEngine.Workspaces(0)
Set midb = miws.OpenDatabase("E:/programas/guiatel.mdb")
Set mirs = midb.OpenRecordset("SELECT * FROM telefonos where nombre like 'a%'")

"En esta Instruccion supuestamente no me da como resultado todos los nombres que empiezan con A"

me gustaria me dieran solucion desde ya muchas gracias

Wenas.Utiliza esta:

"SELECT * FROM telefonos where upper(nombre) like 'A%'

pero es mu raro q la otra no te devuelva todas.A ve si te sirve.Un saludo