Membuat Laporan Supplier Aplikasi Pembelian VB 6.0

Berikut langkahnya :
Buka Crystal Report

Klik Data - OLEDB - Make New Connection - Add - Close

Pilih Database 12.0 Access Database

Masukan alamat database pada Data Source
User Name dan Password kosongkan saja
Klik OK

Pilih TBL_SUPPLIER
Klik Add
Close
Klik Next

Pilih field TBL_SUPPLIER yang akan dimasukan pada Laporan Supplier
Klik Finish

Maka akan muncul data Supplier
Silahkan simpan dengan nama : Lap_Supplier.rpt

cara memanggilnya adalah :

 Private Sub MnLapSupplier_Click()
    CrystalReport1.ReportFileName = App.Path & "\Lap_Supplier.rpt"
    CrystalReport1.WindowState = crptMaximized
    CrystalReport1.RetrieveDataFiles
    CrystalReport1.Action = 1
End Sub