Membuat Laporan Mingguan Dengan Crystal Report Pada VB 6.0

Pada Tutorial kali yaitu Lanjutan dari Postingan kami sebelumnya tentang pembuatan Laporan harian dan untuk kali ini kita akan belajar Pembuatan Laporan Mingguan dengan Crystal Report pada VB 6.0.
Laporan Mingguan adalah untuk melihat dari tanggal A ke tanggal B. sebagai contoh kita ingin melihat transaksi yang terjadi pada tanggal 1 sampai tanggal 7 Juli 2013.

Disini akan kami bahas cara pemanggilan pada Crystal Report yang sudah anda buat tersebut.
Syntaq dasarnya adalah :CrystalReport1.SelectionFormula = "{NamaTabel.NamaField} in date (" & Combo1 & ") to date (" & Combo2 & ")"

Pada syntaq diatas kita asumsikan kita akan memanggil data pada database dengan Nama Tabel dan di Field tersebut. dan pemilihan tanggal kita menggunakan Combo yaitu pada Combo1 dan Combo2

Dan berikut adalah contoh pemanggilan dari beberapa Program yang telah dibuat Oleh PintarVB

Private Sub Combo2_Click()

   CrystalReport1.SelectionFormula = "{Pembelian.TanggalBeli} in date (" & Combo1 & ") to date (" & Combo2 & ")"

    CrystalReport1.ReportFileName = App.Path & "\LaporanMingguanBeli.rpt"
    CrystalReport1.WindowState = crptMaximized
    CrystalReport1.RetrieveDataFiles
    CrystalReport1.Action = 1

End Sub

Semoga bisa membantu Belajar VB 6.0 anda :)

Sumber : http://pintarvb.blogspot.com/2013/07/membuat-laporan-mingguan-dengan-crystal.html

Tweet