Cara Membuat Laporan Bulanan dengan Crystal Report di VB6

Belajar VB - Kursus VB - Tutorial Visual Basic 6.0 dan Visual Basic .Net - Visual Basic Indonesia. Pada Pembelajaran Crystal Report kali ini adalah Cara Membuat Laporan Bulanan Dengan Crystal Report.

Membuat Laporan Bulanan dengan Crystal Report di VB6

Jika muncul seperti Gambar diatas anda Klik Cancel saja dulu
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 Bulanan

Pembuatan Laporan dengan Crystal Report selesai, sekarang kita lanjut ke Tahap 4

4. Membuat Project VB 6 dan Memanggil Laporan Bulanan
Buka Aplikasi VB 6.0 Anda
Simpan Form1 dan Project1 anda pada Folder "Belajar VB"
Buatlah Form Seperti gambar dibawah ini :

Form diatas hanya ditambahkan Frame1, Combo1,Combo2, Command1,Command2 dan CrystalReport1
Kemudian Masukan Koding dibawah ini :

Private Sub Command1_Click()
If Combo1 = "" Or Combo2 = "" Then
MsgBox "Silahkan Isi Bulan dan tanggal terlebihb dahulu!"
Else
    CrystalReport1.SelectionFormula = "Month({Transaksi.Tanggal})=" & Val(Left(Combo1, 2)) & " and Year({Transaksi.Tanggal})=" & Val(Combo2.Text)
    CrystalReport1.ReportFileName = App.Path & "\Laporan Bulanan.rpt"
    CrystalReport1.WindowState = crptMaximized
    CrystalReport1.RetrieveDataFiles
    CrystalReport1.Action = 1
End If
End Sub

Private Sub Command2_Click()
End
End Sub

Private Sub Form_Load()
Combo1.Clear
Combo1.AddItem "1"
Combo1.AddItem "2"
Combo1.AddItem "3"
Combo1.AddItem "4"
Combo1.AddItem "5"
Combo1.AddItem "6"
Combo1.AddItem "7"
Combo1.AddItem "8"
Combo1.AddItem "9"
Combo1.AddItem "10"
Combo1.AddItem "11"
Combo1.AddItem "12"

Combo2.Clear
Combo2.AddItem "2019"
Combo2.AddItem "2019"
End Sub

Silahkan jalankan Project VB 6 anda

sebagai contoh kita akan memanggil Laporan Bulanan pada Bulan 1 tahun 2019
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

Download Source Code Program