Visual Basic para Aplicaciones - recorrer registros de una tabala en access

Buenas tardes.
Tengo el siguiente problema, en una tabla que he creado de una consulta, quiero recorrer los registros para quitar duplicados. Lo hago con el siguiente codigo pero me da error en la linea Dim dbf As Database
Me dice que se esperaba un tipo definido por el usuario, no u proyecto
Este es parte del codigo
Dim a As String
Dim b As String
Dim c As String
a = Forms!AnulacionGestionSocio1![Cuadro combinado0]
b = Forms!AnulacionGestionSocio1![Cuadro combinado5]
Dim registros As Recordset
Dim dbf As Database
Set dbf = CurrentDb
Set registros = dbf.OpenRecordset("Gestion", dbOpenDynaset)
registros.MoveFirst
Do Until registros.EOF
Muchas gracias de antemano

Debes definir en referencias.

En el modulo de Visual Basic selecciona lo siguiente:

Tools(Herramientas)>>References(Referencias)

Selecciona Microsoft DAO 2.5 Library
Tambien puedes usar Microsoft DAO 3.5 Library

Y Microsoft ADO Ext. 2.8 for DDL and Security

Creo que con eso sera suficiente

Saludos
Att. Ing. Zeus Alberto Paez Renteria
Mexicali, B.C. Mexico