Visual Basic - Interceptar error 3022 de Access

Hola, intento averiguar como interceptar desde Visual Basic un error producido por Access al intentar insertar un campo con una clave que ya existe en una tabla. Aparentemente no produce ningún error, y simplemente no lo inserta, pero me interesaría saber cómo saber que el campo ya existe. Lo hago con instrucciones SQL. Gracias.

Yo siempre lo controlo así (por ejemplo al pulsar el botón guardar)

private sub guardar_click()
on error resume next

'asigno a los campos los datos que quiero guardar

recor.update 'guardo el recordset

'para controlar el error

if err.number=3022 then

Yo siempre lo controlo así (por ejemplo al pulsar el botón guardar)

private sub guardar_click()
on error resume next

'asigno a los campos los datos que quiero guardar

recor.update 'guardo el recordset

'para controlar el error

if err.number=3022 then

msgbox "Clave duplicada"

end if

end sub