Gelandang Internet yang mencoba melewati lorong sempit tanpa batas ruang dan waktu

Cara Membuat Laporan Bulanan Di Crystal Report

· · 1 comments
Assalamu'alaikum, wr.wb

Langkah Buat Laporan Perbulan Di Crystal Report - Selamat datang kembali rekan-rekan. Laporan bulanan adalah salah satu bentuk laporan yang sangat dibutuhkan, sehingga kita bisa melihat berapa nilai transaksi pada bulan tersebut. Dengan pelaporan yang tergambar perbulan akan memudahkan pemilik perusahaan atau badan usaha mengambil tindakan untuk memajukan usahanya, misalnya dengan meningkatnya penjualan maka perlu ditambah karyawan agar lebih efien, dan lain-lain.

Baca juga --> Cara buat laporan harian di crystal report

Konsep pembuatan laporan bulanan di crystal report menggunakan bahasa pemograman visual basic hampir sama dengan membuat laporan harian. Hanya saja kita perlu melakukan setingan DtPicker pada form cetak laporan bulanan agar tampil bulan dan tahun saja, sehingga memudahkan dalam memilih bulan berapa yang akan kita tampilkan laporannya. Yang kedua kita perlu melakukan penyesuaian pada setingan tanggal pada crystal report dengan format yang sama pada form.

Buat form cetak laporan bulanan seperti dibawah ini. Untuk menghilangkan toolbox AdoDc ketika form dijalankan, silahkan rubah properti visible true menjadi visible false. Kemudian seting format DtPickernya untuk menampilkan bulan dan tahunnya saja.

Baca juga --> Cara koneksi acces 2007 kevisual basic dengan AdoDc 

laporan bulanan crystal report

Pada crystal report rubah juga format tanggal laporannya dengan hanya menampilkan bulan dan tahun. Klik kanan + format field.

cara membuat laporan bulan tertentu di VB

Selanjutnya pilih March 1999.


Pada command button cetak laporan masukan formula dibawah ini :

Private Sub Command1_Click()
On Error GoTo pesan:
bulan = DTPicker1.Value
CrystalReport1.ReportFileName = App.Path & "\transaksi.rpt"
CrystalReport1.RetrieveDataFiles

CrystalReport1.SelectionFormula = _
    " YEAR({transaksi.tanggal})= " & Year(bulan) & _
    " and month({transaksi.tanggal})= " & Month(bulan) & _
    " and day({transaksi.tanggal})= " & Day(bulan) & ""

CrystalReport1.WindowState = crptMaximized
CrystalReport1.Action = 0
pesan:
If (Err.Number = 20533) Then
MsgBox "Owalah.. Gak Connect Nih bro Laporan Ke Databasenya...!", vbCritical, App.Title
Exit Sub
End If
End Sub

Keterangan :
transaksi.rpt : file laporan crystal report
transaksi.tanggal : nama tabel. nama field tanggal transaksi

Hasil ketika cetak laporan dijalankan seperti screenshot dibawah ini. Moga bermanfaat. Begitulah.
langkah membuat laporan bulanan di visual basic

1 comments:

- Komentar yang mengandung hujatan, negatif akan dianggap spam
- Komentar link akan dilaporkan ke posyandu terdekat & tidak akan ditampilkan