Que tal Ronald, el presente es para saber como le podria hacer para realizar una consulta por letra es decir. En mi tabla productos consultar los productos k esten entre las letras A-B por ejemplo o A-A para que el listado me salgan los productos que empiezen con la letra A. Lei k para esto seria asi ""SELECT * FROM Productos Where [Descripcion] like A-B* (A*)
pero yo kiero k esto lo lea desde unas cajas de texto, yo lo hice asi pero no me lo da siento k algo me falta.

Dim LetraIn As String, LetraFin As String

If Text1.Text = "" Then MsgBox "¡Ingresa la letra Inicial!", vbInformation, "Datos incompletos": Text1.SetFocus: Exit Sub
If Text2.Text = "" Then MsgBox "¡Ingresa la letra Final!", vbInformation, "Datos incompletos": Text2.SetFocus: Exit Sub

LetraIn = Trim(Text1.Text) & "%"
LetraFin = Trim(Text2.Text) & "%"
Adodc1.RecordSource = "Select * From Productos Where [Descripcion] like '" & LetraIn & "' AND '" & LetraFin & "' Order By '"
Adodc1.Refresh

Set DtGridLetra.DataSource = Adodc1
FormatGrid

De esta manera solo me busca los registros de la letra inicial,revisando la BD vi que esta ordenada por numero de codigo no se si sea por eso. Quise utilizar el Between pero no supe como, y si como mencione el orden de la tabal tenga k ver.

Saludos desde Mexico.