SQL - No se que me pasa cn la consulta..ayuda porfavor

buenas tardes a todos todas, tengo un problema con una consulta sql, tengo q visualizar si una pelicula ya ha sido alquilada o no y para ello he puest esta consulta

srtSQL2 = "SELECT Alquileres.Fecha_alquiler AS alquileres FROM Alquileres WHERE (((Alquileres.Referencia)='" & txtreferencia & "') AND ((Alquileres.Fecha_devolución) Is Not Null)) ORDER BY Alquileres.Fecha_alquiler;"
Set rsalqui = bd.OpenRecordset(srtSQL2, dbOpenDynaset)
' Set rspeliculas = bd.OpenRecordset(srtSQL, dbOpenDynaset)
If rsalqui.Fields(0) = "" Then
txtcomentario.Text = "La película no ha sido alquilada"
Else

txtcomentario.Text = "La película ha sido alquilada"
txtfechaalq = rsalqui.Fields(1)
End If

lo que pasa que cuando voy a poner las condiciones if me da error lo primero es que no me entra en el en if si no ha sido alquilada y lo 2 es q me dice q no hay ningun registro activo..que puedo hacer..??? muchas gracias

En lugar de traer registros hacia tu aplicativo, has un COUNT de los registros.

SELECT COUNT(MyCol) FROM MyTabla WHERE.................

Si registra un contador MAYOR a cero, entonces hay alquileres.