DataBase Microsoft Visual Basic 6.0

Rumus/Syntax DataBase Pada Form Load

Private Sub Form_Load()

Data1.DatabaseName = App.Path & "\DB_BARANG 2.mdb"

Data1.RecordSource = "TB_BARANG"

Data1.RecordsetType = 0 - Table

Data1.REFRESH

BERSIH

End Sub

keterengan :
DB_BARANG 2.mdb ini adalah nama database, pastikan nama database anda sama.

TB_BARANG adalah nama tabel anda, pastikan nama tabel anda sama.