Visual Basic - integridad referencial en visual basic 6.0

Hola amigos
Tengo el siguiente problema para poder generar una aplicacion en bases de datos que tiene las siguientes funciones

Agregar registro
Eliminar registro
Consultar registro
Listar registro

Ahora no se como al agregar un nuevo registro de tal manera que me Mueste un mensaje de advertencia por ejemplo "DATO DUPLICADO CAMBIE LA CLAVE DEL REGISTRO" si el dato es duplicado.
sino que continue con el otro ingreso

la base de datos es ACCESS

Gracia.

pos muy sencillo: antes de grabar un nuevo registro debes buscar en la tabla si ya hay alguno que tenga la llave que se intenta dar de alta ¿sí sabes cómo buscar en la tabla?
y deberías decirnos si usas DAO, o ADO, para ayudarte un poco más

En la Base de Datos crea un indice con duplicados no, al principio del modulo pon

On Error Goto Errores
......
......
.....

exit sub 'para que salga si no hay errores

Errores:
Conforme = False 'suelo mandar a grabar con el parámetro Conforme('bool)
Beep
If Err.Number = 3022 Then
MsgBox ("El Código está duplicado, cambialo o Cancela")
Texto(1).SetFocus 'mando el foco donde me interese
Else
MsgBox ("Se ha producido un error " & Err.Number & ", " & Err.Description)
End If

Utilizo ambos casos por ejemplo en ADO como seria