Visual Basic - Access

Buenos días, tengo un problema y va camino de ser de nota, pues nadie me puede ayudar.... Necesito crear una tabla dinamica, por programa, en mi base de datos ACCESS pero al intentar utilizar la librería ADO, casca el programa, la libreria en cuestión no es compatible con la aplicación....¿como hago para crearla?.
Gracias

Saludos.
no se si esto te ayude, pero es lo que yo uso basicamente para abrir las tablas de access. si no te funciona o tienes mas preguntas y crees que puedo ayudarte, escribeme.
suerte.

Private Sub Form_Load()
Dim qqq As String

Dim file As String

KeyPreview = True
file = App.Path + "\contacts.mdb"
cr = Chr$(13) + Chr$(10)
Dim db As Database
Dim rs As Recordset
Set db = OpenDatabase(file)
Set rs = db.OpenRecordset("select * from contacts")
Set Data1.Recordset = rs
Text1.Text = rs!Name
DBGrid1.Refresh
DBGrid1.AllowUpdate = True
DBGrid1.AllowAddNew = True
DBGrid1.AllowDelete = True

' DBGrid1.Columns(0).Width = 3000
' DBGrid1.Columns(1).Width = 2830
' DBGrid1.Columns(2).Width = 500

' Text1.Text = DBGrid1.Columns(0)


End Sub