Wednesday, October 31, 2012

Tutorial Contoh Membuat Data Report Database Sederhana dengan Microsoft Visual Basic 6.0

Setelah kita membuat program database sederhana pada posting Tutorial Contoh Program Database Sederhana dengan Microsoft Visual Basic 6.0, kita akan melanjutkan program yang dibuat tersebut dengan membuat laporan untuk menampilkan record yang ada dalam database.


Ada dua langkah utama untuk membuat data report yang sudah disediakan oleh Microsoft Visual Basic 6.0:
  1. Membuat Data Environment.
  2. Membuat Data Report.
Kita buka kembali project sebelumnya yang sudah ada. Misalkan: project program data teman. Kemudian kita buat reportnya. Dengan 2 langkah umum sebagai berikut:



1.      Membuat Data Environment
a.       Pada menu Project, pilih sub menu More ActiveX Designer…, klik Data Environment.


 
b.      Dalam jendela Data Environment,
-          pilih Connection1 kemudian klik kanan dan pilih Properties.



-          Dalam dialog box Data Link Properties, pilih Microsoft Jet 4.0 OLE DB Provider.



-          Klik Next untuk berpindah ke tab Connection.
-          Klik tombol Elipsis (…). Cari file database data teman (DataTeman.mdb).



-          Klik OK untuk menambah designer pada menu anda.

c.       Sekarang kita akan mengenalkan Data Environment dengan database.
-          Klik kanan tab Connection1 dan klik Rename untuk mengubah nama koneksinya. Ubahlah nama tersebut dengan nama Teman.
-          Klik kanan nama tab yang baru (Teman) dan klik Add Command untuk membuat tab Command1.
-          Klik kanan tab tersebut (Command1) dan pilih Properties.
-          Isilah propertinya dengan nilai berikut:
Command Name          = DataTeman
Connection                    = Teman
Database Object           = Table
Object Name                 = Tteman



-          Klik OK. Semua yang dibutuhkan untuk koneksi ke database kita sudah selesai.

d.      Tampilkan jendela properties dan berikan nama untuk data environment dengan nama DenvTeman. Simpan Environment ini pada folder project anda dengan cara klik File -- Save DenvTeman.dsr



Tampilan akhir langkah 1:


2.        Membuat Data Report
a.       Pada menu Project, klik Add Data Report




b.     Isilah properties pada report seperti berikut:
Name                          = rptTeman
Caption                      = Daftar Nama Teman
DataSource                = DEnvTeman                   (dipilih, jgn dketik)
DataMember             = DataTeman                    (dipilih, jgn dketik)
c.  Klik kanan Report dan klik menu Retrieve Structure. Hal ini akan membentuk report dengan dasar format seperti pada Data Environment.
d.      Dalam file report terdapat lima bagian: Report Header, Page Header, Detail Section, Page Footer, dan Report Footer.
-   Page Header dan Page Footer berisi informasi yang ingin ditampilkan pada setiap halaman.
-   Detail Section digunakan untuk membuat layout informasi yang ingin anda cetak dari setiap record pada file database anda.
e.   Tambahkan data report controls yang diperlukan untuk menampilkan infrmasi yang kita inginkan.
-          Untuk menambahkan contrrol yang digunakan dengan klik kanan, pilih Insert Control, kemudian pilih control yang diperlukan untuk dipasang.


 -       Khusus untuk detail sections, kita bisa menambahkan textbox untuk menampilkan data pada bagian ini dengan cara: pada jendela Data Environment (DEnvTeman), klik field yang diinginkan (misal: Nama) kemudian drag ke bagian detail pada data report. Dua item akan ditampilkan: sebuah label Nama dan sebuah textbox Nama(DataTeman). Labelnya untuk informasi header, karena itu, pindahkan (drag) ke bagian page header. Sedangkan textboxnya untuk bagian detail, jadi biarkan saja letaknya pada bagian detail sections.
-      Atur control-control lainnya sedemiikian rupa sesuai dengan informasi yang kita butuhkan.


-          Simpan Data reportnya dengan klik menu File - Save rptTeman. Simpan pada direktori tempat project anda.


Data report sudah selesai kita buat. Sekarang kita tambahkan CommandButton pada form yang ada untuk menampilkan laporan yang sudah kita buat sebelumnya.
Ubah propertiesnya sebagai berikut:
Name           = CmdReport
Caption       = Report
Kemudian pada event click, ketikan kode berikut:

Private Sub CmdReport_Click()
    rptTeman.Show 1
End Sub




 

No comments: