Membuat Laporan Tahunan Dengan Crystal Report Pada VB 6.0

 
Untuk mengikuti Tutorial Pembuatan Laporan Tahunan kali ini, kami menyarankan anda melihat Postingan kami sebelumnya yaitu cara membuat Laporan Harian, Mingguan dan Bulanan agar anda bisa tahu Perbedaannya.

Baiklah jika anda sudah mengikuti pembuatan laporan kita dari awal, langsung saja Fungsi Laporan Tahunan ini adalah Untuk melihat Semua Transaksi yang terjadi di Tahun tertentu. Sebagai contoh kita akan melihat semua Transaksi yang Terjadi di Tahun 2013 baik banyaknya akumulasi Barang, Banyaknya transaksi Supplier atau Pelanggan anda.

Disini akan kami bahas cara pemanggilan pada Crystal Report yang sudah anda buat tersebut.
Syntaq dasarnya adalah :

CrystalReport1.SelectionFormula = "year({NamaTabel.NamaField})=" & Val(Combo1) & "' "

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 yang akan diambil tahunnya

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

Private Sub Combo1_Click()
    CrystalReport1.SelectionFormula = "year({Pembelian.TanggalBeli})=" & Val(Combo1) & "' "
    CrystalReport1.ReportFileName = App.Path & "\LaporanBeliTahunan.rpt"
    CrystalReport1.WindowState = crptMaximized
    CrystalReport1.RetrieveDataFiles    CrystalReport1.Action = 1
End Sub

Semoga bisa membantu Belajar VB 6.0 anda :)

Tweet