Visual Basic - Imprimir informe

Necesito imprimir un informe de Access, hasta ahora lo hacía con funciones propias de Access, pero quisiera hacerlo a través de la conexion ODBC con ADO, ¿cómo?, por favor es urgente.

muchas gracias de antemano.

Puedes hacerlo de varia maneras, con un Data Report, (busca en la ayda de visual), o mediante un archivo de Word, primero creas una plantilla en word y le das el nombre que quieras y luego le añades al programa de visual el siguiente código, para el boton cmdimprimirword

Private Sub cmdimprimirword_Click()

'crear la variable word
Dim objDoc As Word.Document
'inicializar word y hacerlo visible
Set objword = New Word.Application
'hacemos invisible el documento de word
objword.Visible = False

'crear un nuevo documento utilizando la plantilla anteriormente creada
Set objDoc = objword.Documents.Add("c:\cgutierrez\plantilla4.dot")
'convertir este nuevo documento en el documento activo
objDoc.Activate = True

'no posicionamos en la primera marca
'insertar salto de línea
'objDoc.ActiveWindow.Selection.InsertParagraphAfter
'objDoc.ActiveWindow.Selection.InsertParagraphAfter
'insertar el texto con el contenido de lo que hay en el campo correspondiente del formulario activo
'poner y quitar las neguillas
objDoc.ActiveWindow.Selection.Font.Bold = wdToggle
objDoc.ActiveWindow.Selection.GoTo what:=wdGoToBookmark, Name:="uno"
objDoc.ActiveWindow.Selection.Font.Bold = wdToggle
objDoc.ActiveWindow.Selection.InsertAfter (txtDni.Text)
objDoc.ActiveWindow.Selection.InsertParagraphAfter
objDoc.ActiveWindow.Selection.Font.Bold = wdToggle
objDoc.ActiveWindow.Selection.GoTo what:=wdGoToBookmark, Name:="nombre"
objDoc.ActiveWindow.Selection.Font.Bold = wdToggle