Visual Basic - Como abro una tabla de Access

Estoy aprendiendo a programar en VB y no se como abrir una base de datos de access para accesar una tabla y que los datos de esa tabla sirvan para un Cuadro Combo.
Les agradecere me informen.
Angel Marin

chdir app.path ' para tener el path detu base de datos
set db = opendatabase("nombre.mdb")
set rs =db.openrecordset("select * from tabla"
with rs
while not .eof
combo1.additem !nombre del capo
.movenext
wend
end with
si tienes dudas escribe