Membuat Laporan Dari Bulan 1 Ke Bulan 2 Dengan Crystal Report

Pada Tutorial kali ini ialah lanjutan pembuatan laporan Bulanan pada sebelumnya. Jika sebelumnya telah kita bahas bagaimana cara menciptakan Laporan Bulanan Dengan Crystal Report, sekarang saatnya kita buat Laporan Dari Bulan 1 ke Bulan 2 atau Dari Bulan A ke Bulan B pada Visual Basic 6.0.

Fungsi ini banyak dipakai 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 ialah :
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 ialah teladan pemanggilan dari beberapa Program yang telah dibentuk 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 dapat membantu Belajar Visual Basic 6.0 anda :)