VB 6.0 no corresponde a programación .NET y de por si es un lenguaje muy obsoleto, deberías cambiarte a .NET.
por el error, puede ser que intentes duplicar el valor en la PK, pero hace años que no manejo DAO ni ADO y creo que el error que me presento en esa ocasión era diferente, de todos modos ya reporte el mensaje para que lo muevan al foro de vb6