Klik File
New
Pilih Standard - Klik OK
Klik Database
Double Klik Find Database File
Kemudian anda cari ke Folder D:\Belajar VB
Klik DBBelajarvb - Kemudian Klik Open
Kemudian Klik Add
Klik close
Klik Next
Klik Add All
Kemudian Klik Finish
Maka akan Muncul seperti gambar dibawah :
Klik File - Save
Simpan pada Folder yang sama yaitu "Belajar VB" dan beri nama Laporan Harian
Pembuatan Laporan dengan Crystal Report selesai, sekarang kita lanjut ke Tahap 4
4. Membuat Project VB 6 dan Memanggil Laporan Harian
Buka Aplikasi VB 6.0 Anda
Simpan Form1 dan Project1 anda pada Folder "Belajar VB"
Buatlah Form Seperti gambar dibawah ini :
Kemudian Masukan Koding dibawah ini :
Private Sub Command1_Click()
CrystalReport1.SelectionFormula = "Totext({Transaksi.Tanggal})= '" & CDate(DTPicker1) & "'"
CrystalReport1.ReportFileName = App.Path & "\Laporan Harian.rpt"
CrystalReport1.WindowState = crptMaximized
CrystalReport1.RetrieveDataFiles
CrystalReport1.Action = 1
End Sub
Silahkan jalankan Project VB 6 anda
sebagai contoh kita akan memanggil Laporan Harian pada tanggal 1 Juni 2014
Kemudian Klik Cetak
Maka akan Muncul :
Mudah Bukan ???
Untuk hasil latihan diatas anda bisa KLIK LINK INI
Jika anda mengalami kesulitan atau ada yang ingin ditanyakan, anda bisa berkomentar di bawah