Vamos a ver, Jordi:
El ejemplo que te envió Angel ya lo tiene previsto; concretamente la línea que dice If Adodc1.Recordset!Numamigo = Val(txt_codigo) Then significa que si ya existe un registro en el que el Número de amigo sea igual al Número que tu acabas de introducir... Y le manda que te presente la ficha del amigo que ya tiene asignado ese número...
O sea que, tranquilo, que no vas a tener números repetidos.
Saludos
