Devi prima fare il collegamento al DB
poi setti un oggetto recordset e poi fai ti crei le query usando il linguaggio SQL anche da dentro access e poi le copii dentro visual basic.....................
tipo
dim rs as recordset
dim oCN as connection
oCN.open.....'stringa di connessione al db'
set rs = oCN.execute("select * from...")
do until rs.eof
..........
..........
rs.movenext
loop