Jangan lupa membaca artikel sebelumnya, yaitu > Panduan Pemrograman Pemula.

Kembali Lagi di Tutorial Crystal Report bersama JavaNetMedia.com, kali ini kita akan melanjutkan tutorial tentang Crystal report, jika sebelumnya kita telah membahas Cara Membuat Laporan Harian, kini saatnya kita membuat Laporan Bulanan Crystal Report pada VB .Net 2010.

Cara Membuat Laporan Bulanan Crystal Report Pada VB .Net 2010

Berikut langkahnya :

LANGKAH #1
Buatlah Sebuah Project dengan VB .Net 2010

Saya membuat Project dengana Nama : AppProject dan saya menyimpan di Drive D:\Laporan\Bulanan
Klik OK
Pada Form1, saya tambahkan Label1, Label2, ComboBox1, ComboBox2 dan Button1


LANGKAH #2
Buatlah Database dengan nama : DBJNM.mdb
Buatlah Tabel Dengan nama : Penjualan
Berikut design tabel Penjualan beserta isisnya (kami menggunakan database access .mdb)

Cara Membuat Laporan Bulanan Crystal Report Pada VB .Net 2010
Simpan database Pada Folder Bin/Debug pada Project VB .Net 2010 yang telah anda buat pada langkah1

LANGKAH #3
Jika sudah membuat database saatnya kita buat laporan dengan crystal report.
Buka Crystal Report Pada komputer anda
Klik File - New :
Klik Standard - OK
Klik Database - Database Files - Find Database File - Pilih Database DBJNM.mdb yang telah anda buat
Klik Penjualan - Add - kemudian klik Close
Klik Next - Add All - Finish

Maka akan muncul gambar dibawah ini :

Cara Membuat Laporan Harian Crystal Report Pada VB .Net 2010
Silahkan anda Save dengan nama : LaporanBulanan.rpt
Jika sudah sukses membuat seperti gambar diatas, kita langjutkan pada Form1 di langkah 1
Pada Form1 tambahkan Crystal Report Control
Cara Membuat Laporan Bulanan Crystal Report Pada VB .Net 2010

Kemudian Masukan Koding dibawah ini :
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
ComboBox1.Items.Add("1")
ComboBox1.Items.Add("2")
ComboBox1.Items.Add("3")
ComboBox1.Items.Add("4")
ComboBox1.Items.Add("5")
ComboBox1.Items.Add("6")
ComboBox1.Items.Add("7")
ComboBox1.Items.Add("8")
ComboBox1.Items.Add("9")
ComboBox1.Items.Add("10")
ComboBox1.Items.Add("11")
ComboBox1.Items.Add("12")
ComboBox2.Items.Add("2015")
ComboBox2.Items.Add("2016")
ComboBox2.Items.Add("2017")
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
AxCrystalReport1.SelectionFormula = "Month({Penjualan.Tanggal})=" & Val(ComboBox1.Text) & " and Year({Penjualan.Tanggal})=" & Val(ComboBox2.Text)
AxCrystalReport1.ReportFileName = "LaporanBulanan.rpt"
AxCrystalReport1.WindowState = Crystal.WindowStateConstants.crptMaximized
AxCrystalReport1.RetrieveDataFiles()
AxCrystalReport1.Action = 1
End Sub
End Class
End Class Berikut Hasilnya :
Cara Membuat Laporan Bulanan Crystal Report Pada VB .Net 2010

Jika sudah silahkan pilih Bulan dan Tahun Pada ComboBox
Kemudian Klik Button Cetak Laporan
Harusnya Muncul data sesuai dengan yang ada didatabase


Jika anda sudah melakukan langkah diatas, namun data tidak muncul, anda bisa lihat tutorial yang sudah saya buat dengan KLIK DISINI

Semoga Bermanfaat untuk anda


Selain sebagai media informasi pemrograman, kami juga berbagi artikel terkait tips trik Android.

Post a Comment

أحدث أقدم