listing koneksi data pada vb

Form Load()
data.databasename=app.path & "nama_database.mdb"
data.recordsource=nama_tabel
data.refresh
End Sub

contoh:

Form Load()
databarang.databasename=app.path & "penjualan.mdb"
databarang.recordsource=barang
databarang.refresh
End Sub

*catatan: databarang adalah nama object didalam vb untuk membantu koneksi database.
               app = aplikasi   path = tempat penyimpanan ditentukan didalam direktori yang sama pada form