Pertemuan 11

1. Pembahasan

Pada modul proses.vb kita deklarasikan unction Tampil Sembako, tanpa parameter dan memiliki tipe data Data Table.

Kemudian di dalamnya kita deklarasikan variabel-variabel yang kita perlukan, seperti query dan variabel Data Table itu sendiri.

Query yang kita gunakan adalah menjoinkan tabel sembako dan kategori, kemudian menjadikan atribut yang tampil sesuai dengan yang diinginkan.

Untuk query SELECT kita gunakan function getResult dari module koneksi yang manfaatnya mengambil data dari database berdasarkan query yang dikirimkan. Kemudian hasilnya disimpan sebagai dt. Nilai dt inilah nilai kembali pada function TampilSembako.

2. Memanggil TampilSembako di FormBeranda

Oleh karena itu code untuk menampilkan data buku ini kita bangun pada FormBeranda_Load. Klik FormBeranda dua kali untuk membangkitkan method ini.

Berikut halaman beranda ketika aplikasi dijalankan:

3. Tampil Level

Proses tampil level merupakan proses dari Kelola Level yang hanya dapat dilakukan oleh admin. Pada aplikasi ini, data level akan tampil setelah menu Level diklik. Oleh karena itu kita buat terlebih dulu FormLevel menggunakan Inherited Form (cara yang sama saat membuat FormBeranda).

Selanjutnya kita susun object-object control pada FormLevel sebagai berikut.

Sehingga tampilan dari FormLevel adalah sebagai berikut.

4. Function TampilLevel()

TampilLevel dan proses lainnya dari Kelola Level hanya bisa dilakukan oleh Admin saja. Query yang digunakan pun juga berbeda, karena hanya menggunakan tabel level saja. Berikut function TampilLevel yang kita bangun pada module proses.vb.

5. Menangani Perpindahan Menu Beranda-Level

Kita buka MasterMenu.vb, kemudian pada kita lakukan pengisian kode pada menuBeranda_Click dan menuLevel_Click. Procedure menuBeranda_Click dapat kita bangkitkan dengan mengklik menuBeranda dua kali. Demikian juga dengan menuLevel_Click dapat kita bangkitkan otomatis dengan mengklik menuLevel dua kali. Kedua pocedure ini berada di dalam Class MasterMenu.

6. Memanggil TampilLevel di FormBeranda

Sekarang kita akan memanggil TampilLevel di FormLevel. Klik dua kali di FormLevel untuk membangkitkan method FormLevel_Load.

7. Tampil User

Bangun FormUser yang merupakan inherited form dari MasterMenu.

Function TampilUser()

Selanjutnya kita susun objek control nya:

Sehingga tampilan halaman nya seperti dibawah ini:

Kelola User dapat dilakukan oleh Admin dan Pegawai. Tetapi Tampil User hanya dapat dilakukan oleh Admin tanpa memerlukan parameter. Sama seperti Tampil Level, pengaturan ini sudah dilakukan sebelumnya di MasterMenu. Berikut function TampilUser yang kita bangun di module proses.vb.

8. Menu User

Sekarang kita kelola menuUser_Click di MasterMenu dengan membangkitkan method ini melalui klik dua kali pada menu User di halaman MasterMenu.

9. Memanggil TampilUser di FormUser

Klik dua kali di FormUser untuk membangkitkan method FormUser_Load, kemudian isikan kode untuk mengisi DataGridView DG dengan memanggil method TampilUser.

10. Tampil Kategori

Bangun FormKategori yang merupakan inherited form dari MasterMenu.

Selanjutnya susun object controlnya:

Sehingga tampilanya seperti dibawah ini:

11. Function TampilKategori()

Method TampilKategori kita deklarasikan di dalam module Proses.vb seperti yang ditunjukkan pada potongan kode berikut.

12. Menu Kategori

Selanjutnya pada MasterMenu kita tangani menuKategori_Click

Memanggil TampilKategori di FormKategori

13. Tampil Catatan

Tampil catatan juga hanya diperuntukkan untuk Admin saja, dimana penanganannya juga telah dilakukan di MasterMenu. Kita bangun terlebih dahulu FormCatatan menggunakan Inherited Form dari MasterMenu.