Membuat Laporan Dari Bulan 1 Ke Bulan 2 Dengan Crystal Report

Pada Tutorial kali ini adalah lanjutan pembuatan laporan Bulanan pada sebelumnya. Jika sebelumnya telah kita bahas bagaimana cara membuat Laporan Bulanan Dengan Crystal Report, kini saatnya kita buat Laporan Dari Bulan 1 ke Bulan 2 atau Dari Bulan A ke Bulan B pada VB 6.0.

Fungsi ini banyak digunakan pada Laporan Triwulan, Laporan Caturwulan, atau Laporan PerSemester dengan Crystal Report.

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

Pada syntaq diatas kita asumsikan kita akan memanggil data pada database dengan Nama Tabel dan di Field tersebut. dan pemilihan Bulan 1 Pada Combo1, Bulan 2 pada Combo2 dan Tahun Pada Combo3

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

Private Sub Combo1_Click()
    CrystalReport1.SelectionFormula = "Month({Pembelian.TanggalBeli})=" & (Combo1) & " to " & (Combo2) & " and Year({Pembelian.TanggalBeli})=" & Val(Combo3.Text)
    CrystalReport1.ReportFileName = App.Path & "\LaporanPembelianBulanKeBulan.rpt"
    CrystalReport1.WindowState = crptMaximized
    CrystalReport1.RetrieveDataFiles
    CrystalReport1.Action = 1
End Sub

Semoga bisa membantu Belajar VB 6.0 anda :)

Tweet