Cara Membuat Program Laporan Dengan Crystal Report 8.5 Dan Visual Basic 6.0

Cara Membuat Program Laporan Dengan Crystal Report 8.5 Dan Visual Basic 6.0 | Gho Blog's - Apa kabar sobat semua...? Setelah sebelumnya kita pernah membahas tutorial Visual Basic 6.0 seputar simpan, edit, delete dengan menggunakan tools-tools yang ada, kita juga sudah pernah membahas bagaimana cara membuat menu. Kali ini saya akan mencoba membagikan lagi tutorial pemrograman Visual Basic 6.0 yang berhubungan dengan program laporan.

Untuk pembuatan program laporan, saya menggunakan software Crystal Report 8.5 sebagai media design yang nantinya akan terhubung dengan program Visual Basic 6.0. Untuk tahap awal, kita coba dulu membuat laporan dari satu buah tabel saja. Nanti pada kesempatan lainnya baru kita bahas bagaimana membuat laporan menggunakan 2-3 tabel dalam satu disain dan bagaimana membuat laporan berdasarkan seleksi data.

Lihat Juga : Cara Mudah Mendapatkan Dollar Dari Inetrnet...!!!

Daripada sobat membuat project baru, sobat bisa download saja project sebelumnya Disini. Karena kita akan melanjutkan dari project tersebut, jadi sobat cukup menambahkan sebuah form saja.

Untuk membuat laporan, silakan sobat ikuti langkah-langkah berikut ini :

• Jalankan software Crystal Report 8.5 di komputer sobat
• Setelah kotak dialog Welcome to Crystal Report terbuka pilih As a Blank Report kemudian klik OK.

• Setelah itu pilih Database Files, kemudian double klik pada Find Database File.

• Cari letak database dari project yang sobat download tadi, jika sudah ketemu klik latihan.mdb kemudian klik Open.

• Setelah itu klik tbbelajar hingga muncul tanda check list hijau, kemudian klik Add dan klik tombol Close.

• Maka akan terbuka form design Crystal Report dan kotak dialog Field Explorer. Pilih Database Fields, kemudian klik tbbelajar maka akan tampil seluruh fields dari tabel tbbelajar.

• Disini sobat bisa melakukan Drag and Drop field-field tersebut dan letakkan pada bagian Details di lembar form Crystal Report.

• Lakukan hingga semua field tersusun rapi pada lembaran design Crystal Repot. Sobat bisa mengatur panjang dari tiap-tiap field dengan cara menarik garis putus-putus field tersebut.

• Untuk bagian Page Header, sobat bisa mengedit dan mengganti tulisannya dengan cara double klik pada field yang berada di Page Header kemudian Blok dan hapus tulisan tersebut dan ganti sesuai selera sobat. Sobat bisa menggunakan tools yang tersedia pada menu untuk mengubah tulisan pada Page Header.

• Jika sudah maka hasilnya akan seperti ini 

• Untuk Field tanggal lahir kita akan merubah format menjadi DD-MMMM-YYYY. Caranya, klik kanan pada fields tgl_lahir kemudian pilih Format Field.

• Pada kotak dialog Format Editor, pilih Tab Date / Time. Cari pada list yang tersedia format tanggal yang sobat inginkan dan klik OK.

• Selanjutnya, kita akan membuat tabel. Caranya, klik menu Insert kemudian pilih Line. Buatlah garis untuk tiap batas secara hati-hati agar terlihat rapi. Jika sudah maka hasilnya seperti berikut ini : 

• Untuk melihat hasil design, sobat bisa klik icon Print Preview yang berada di menu bar.

Lihat Juga : Cara Mudah Mendapatkan Dollar Dari Inetrnet...!!!

• Jika rasanya sudah rapi, selanjtnya kita akan membuat judul laporan yang akan kita letakkan pada bagian Report Header. Disini, sobat bisa mengatur ruangnya dengan menarik garis abu-abu yang berada di lembaran design.

• Untuk membuat judul, klik menu Insert kemudian pilih Text Object dan letakan di bagian Report Header. Ketikkan kata-kata yang ingin sobat buat pada Text Object tersebut. Sobat juga bisa mengatur besar kecil huruf menggunakan tools seperti menggunakan MS Word. Disini sobat juga bisa menambahkan gambar agar terlihat lebih bagus lagi laporan yang sobat buat. Caranya, klik menu Insert kemudian pilih Picture, cari gambar yang ingin sobat masukkan kemudian klik Open. Jika sudah maka hasilnya akan seperti berikut ini.

• Selanjutnya kita akan menambahkan sedikit keterangan pada bagian bawah laporan (Page Footer). Kita akan menambahkan dua buah Formula Field yaitu "namakepsek" dan "nip". Mungkin sobat bingung apa guna dari Formula Field tersebut. Sobat akan tahu sendiri nanti setelah program ini selesai dikerjakan. untuk membuat Formula Field ikuti langkah berikut :
• Pada kotak dialog Field Explorer pilih Formula Fields kemudian klik icon New.

• Kemudian pada kotak Formula Name ketikkan kata namakepsek kemudian klik OK.

• Pada kotak dialog Formula Editor, klik saja tombo Close dan jika muncul pesan untuk menyimpan klik tombol Yes.

• Buatlah satu buah Formula Fields dengan nama "nip" menggunakan cara yang sama sebelumnya.
• Kembali ke kotak Field Explorer. Pilih Special Fields kemudian Drag And Drop Print Date dan letakkan pada bagian Page Footer seperti gambar dibawah ini :

• Untuk nama kota : Tanjungpinang dan Kepala Sekolah sobat bisa menggunakan Text Object seperti membuat judul sebelumnya.
• Kembali ke Formula Fields, Drag And Drop formula namakepsek dan nip, kemudian letakkan pada bagian Page Footer seperti gambar berikut ini :

• Berilah garis antara namakepsek dengan nip menggunakan Line. Formula yang kita buat ini akan terhubung langsung dengan form Visual Basic nantinya.
• Kemudian Save design Crystal Report ini dengan nama lap-data-siswa.rpt dan letakan satu folder dengan project Visual Basic 6.0 yang sobat download tadi. 
• Bukalah project Visual basic yang sobat download, kemudian tambahkan satu buah form.
• Kemudian kita harus mengaktifkan Crystal Report Control yang berada di Visual Basic terlebih dahulu. Caranya klik menu Project kemudian pili Componets.
• Cari Crystal Report Control yang berada di list, beri tanda check list kemudian klik OK.

• Buatlah design form seperti gambar berikut ini :

• Atur Interval Timer1 menjadi 360
• Double klik pada Timer1 kemudian masukkan script berikut tepat diantara Private Sub Timer1_Timer() dengan End Sub

Label4.Caption = Format(Date, "dd MMMM YYYY")

• Kemudian double klik pada Tombol Cetak dan masukkan script berikut tepat diantara Private Sub Command1_Click() dengan End Sub

If Text1.Text = "" Or Text2.Text = "" Then MsgBox "Data Yang Anda Masukkan Belum Lengkap", vbInformation, "Warning" Else CrystalReport1.ReportFileName = App.Path & "\lap-data-siswa.rpt" CrystalReport1.RetrieveDataFiles CrystalReport1.WindowState = crptMaximized CrystalReport1.Formulas(0) = "namakepsek='" & Text1.Text & "'" CrystalReport1.Formulas(1) = "nip='" & Text2.Text & "'" CrystalReport1.Action = 0 pesan: If (Err.Number = 20533) Then MsgBox "Data Base Tidak Bisa Diakses...!", vbInformation, App.Title Exit Sub End If End If

Catatan :

Program laporan ini akan error jika dipindah folder atau dipindahkan ke partisi lain. Untuk mengatasinya, ikuti langkah berikut ini :

1. Buka design Crystal Report yang telah dibuat.
2. Klik menu Database kemudian pilih Set Location
3. Kemudian klik tombol Same As Report dan klik tombol Done.

Untuk lebih lanjut, jika sobat mengalami kendala pada toturial kali ini sobat bisa mendownload contoh program jadinya melalui link dibawah ini :

Lihat Juga : Cara Mudah Mendapatkan Dollar Dari Inetrnet...!!!

Atau :

Sekian dulu tutorial saya yang berjudul Cara Membuat Program Laporan Dengan Crystal Report 8.5 Dan Visual Basic 6.0. Semoga bermanfaat dan selamat mencoba.