[VB] ayuda con consulta a access desde VB

hola tengo un problema a la hora de hacer una consulta que me devuelva los datos de una tabla cuyas fechas sean correspondientes solo al mes espesificado:

--------------------------------------------------------------------------------------------

datos de la coneccion

Public conn As ADODB.Connection
Public rs As ADODB.Recordset
Public reload As Boolean
Sub Connect()
Set conn = New ADODB.Connection
conn.CursorLocation = adUseClient
conn.ConnectionString = "Driver={Microsoft Access Driver (*.mdb)};" _
& "Dbq=" & App.Path & "\bd.mdb;" _
& "Uid=Admin;" _
& "Pwd=********;"
conn.Open
End Sub

-------------------------------------------------------------------------------------------

strconsul = "Select usuarios.usuario, gastos.precio, gastos.concepto,"_

& " gastos.fecha, gastos.comprobante from "_

& "(gastos Inner Join usuarios ON gastos.idusuario=usuarios.id)"_

& " where gastos.fecha LIKE '*/05/*' "

' aca quiero que me devuelva todos los de mayo, ya probe con funciones definidas en access pero me dice "funcion no definida en la consulta" probe ocn ParcFecha(m,gastos.fecha)

rs.Open strconsul, conn, adOpenStatic, adLockReadOnly
Set DataGrid1.DataSource = rs

no me devuelve nada.