Visual Basic - ADO

Hola :
Estoy haciendo una agenda.
Pregunta:
Tengo una MDB con campos FECHA, HORA Y CITA.(tres texbox)
Cuando grabo una cita nueva quiero que el programa lea si la fecha y la hora ya existen MSGBOX "Cita existente", sino agrego una nueva.
Lo que seria mas o menos así:
with ado.recordset
ado.recorset.find "fecha=" fecha.text and hora.text
if esto es verdadero then
msgbox "La cita ya existe"
Else
ado.recordset.addnew
etc,etc...
end if
end with
Desde ya muchas gracias.
Saludos.
Horacio