Visual Basic - abrir consulta y report desde vb

como puedo abrir una consulta y un report de una base *.mdb desde vb atraves de button y luego imprimirlos?. He intentado abrir una base access de la siguiente forma y me da error(me dice que la base ya esta abierta..):
dim msobj as access.aplication
set msobj = createobject ("access.aplication")
msobj.opendatacurrent (c:\.....")
msobj.visible

Por el código que has escrito lo que estás intentando hacer es abrir el Access con la base de datos que te interesa y ya está. Si lo que quieres es realizar sólamente una consulta a tu base de datos para después poder imprimir los datos con crystal report el código es totalmente diferente. Si ésto es lo que quieres dímelo que yo te puedo pasar el código, envíamelo a mi e-mail.

La verdad es que ahora que lo pienso,...
Te cuento:
Tengo un programa, por el que me conecto a una base determinada con ADO, y creo tablas y consultas en esa base por medio de sentencias sql (execute) (Create table...),mi primera duda es que parar crear una consulta en la base de datos, tengo que hacerlo asi:
...dim query_ as DAO.querydef
set query_=db.createquerydef("empleados")
query_.SQL = ("SELECT *....") ,....
y me gustaria hacer algo como esto (CREATE QUERY..), pero creo que no se puede...
Pero mi duda es que una vez realizada esas querys, quiero imprimirlas de dos formas, una es 'abriendo' la consulta concreta del access e imprimir con un button(sin tener que hacer nada en el access que se esta abriendo), y la otra es imprimirlo sin entrar en el access, y viendo una vista previa del resultado (alomejor asociando las 'select' a un dbgrid, que creo que se hace asi : dbgrid.datasource = "select * ...").
Un saludo,

gracias