Visual Basic - Access 2007 con Visual Basic

Buenos dias, tengo un problema con una conexion de visual Basic con Access 2007, la verdad es que nunca he trabajado en Basic y no puedo hacer la conexion, abajo adjunto el codigo que estoy utilizando por si alguien me puede ayudar, se los agradezco mucho pq me urge.

Option Compare Database

Public cn As ADODB.Connection
Public rs As ADODB.Recordset
Sub abrir()
Set cn = New ADODB.Connection
Set rs = New ADODB.Recordset
cn.Provider = "Microsoft.ACE.OLEDB.12.0"
cn.ConnectionString = "User id = admin; password =; data source = c:anis.accdb"
cn.Open
End Sub
Sub cerrar()
cn.Close
Set cn = Nothing
End Sub

Este codigo me envia un error de que se esta usando un tipo de dato no definido por el usuario y me marca la primera declaracion publica de variable en ADODB.

Hombre, tendrás que marcar alguna referencia a ADO, digo yo no?

un truco muy conocido y funcional es que agreges un control adodc y desde ayu generes la cadena de conexion
que te puede quedar asi:

Set cn = New ADODB.Connection

cn.open "Provider=Microsoft.ACE.OLEDB.12.0;data source=ruta de tu bd;mode=modo elegido;persist security info=False"

esto lo pones en la propiedad open de la variabla ADODB.Connection