Que te marca?
Pero te digo hazlo mejor de la primer forma por ejem:
cn as new adodb.connection
rs as new adodb.recordset
sql as string
cn.open "tu conexion"
En el boton de borrar
sql="select count(*) from tu tabla where tucondicion" 'Para saber que registro va aborar si existe o no
set rs=cn.execute(sentencia)
if rs(0)=0 then
Msgbox "El registro no existe"
else
sql="Delete from tu tabla where tucondicion" 'Que registro va a borrar
cn.execute(sentencia)
Msgbox "Registro Eliminado"
End if
Saludos