Visual Basic - Falla o ignorancia?

Hola amigos del foro.
Tengo el siguiente codigo:

Public MiConexion As New ADODB.Connection
Public MyRst As New ADODB.Recordset
With MiConexion
.CursorLocation = adUseServer
.Open "Provider=Microsoft.JET.OLEDB.4.0;Data SOURCE=" & App.Path & "\db0.mdb;Persist Security Info=False"
End With
Set MyRst = New ADODB.Recordset
With MyRst
.CursorLocation = adUseClient
.CursorType = adOpenDynamic
.LockType = adLockReadOnly
End With

INr = "A0049"
Sql = "Select * from Details WHERE Invoice LIKE '%" & INr & "%'"
MyRst.Open Sql, MiConexion, adOpenDynamic, adLockOptimistic, adCmdText
RcCnt = MyRst.RecordCount
While Not MyRst.EOF
X = MyRst!Amount
Y = X + Y
MyRst.MoveNext
Wend

Bueno, el punto es que estoy absolutamente seguro de que en la tabla Details hay al menos un registro que cumple con el criterio de seleccion (Invoice = "A0049") .De hecho he seguido el proceso paso a paso, abriendo la tabla para asegurarme, y efectivamente al momento de ejecutar este codigo hay un registro que cumple con la condicion. Lo extrano y desesperante es que a veces lo encuentra (MyRst.RecordCount = 1) y otras veces sencillamente no lo encuentra (MyRst.RecordCount = 0) .
A primera vista me parece una falla pero creo que hay algo que estoy ignorando. Si alguien lo ve le estare muy agradecido. :-)
Gracias

Por lo que veo estás utilizando una bd de Access. No sé si será este el problema, pero el SQL que utiliza Access no es exactamente igual que el convencional, es decir, que, por ejemplo, en el caso de tu consulta, no utiliza el % sino el *. Yo he hecho una consulta de prueba en Access y después he mirado la sentencia SQL que genera y allí lo he visto. Ya te digo, no sé si será este el problema pero quizás pueda ayudarte, yo a veces he tenido problemas por este motivo. Suerte!!!!

Gracias Maria Jose pero no era eso. Mas arriba he replanteado mi problema. Tiene el titulo "Refresh tabla". Por si lo quieres ver.
Gracias por tu ayuda y tu interes :-)