Diberdayakan oleh Blogger.

Jumat, 10 Juni 2011

Belajar Visual Basic 23. Kode Program untuk Entri Barang: Menutup form


Setelah selesai dengan pembuatan database, desain form. Langkah selanjutnya adalah membuat kode program untuk frmbarang. Sebagaimana telah dijelaskan sebelumnya, frmbarang akan kita gunakan sebagaimana kita menggunakan Visdata dalam mengambahkan record, mengedit dan menghapusnya, namun tentunya dengan fitur yang lebih user friendly. Kita juga sudah menambahkan DAO untuk penghubung dari VB ke database inventori.mdb.

Prosedur untuk menutup Form
Langkah pertama adalah menambahkan perintah untuk ”menutup” form. Maksud menutup disini adalah sepadan dengan perintah close, atau exit pada  program aplikasi yang biasa kita gunakan. Sebenarnya frmbarang telah dilengkapi dengan tombol close pada sudut sebelah kanan form. Tapi kita telah menambahkan sebuah tombol yang memang dikhususkan untuk menutup form yang bersangkutan. Adapun langkah untuk menambahkan coding untuk menutup form adalah sebagai berikut:
  • Double click pada cmdtutup
akan muncul private sub cmdTutup_click()
mendouble-click sebuah control akan memindahkan fokus dari kursor ke jendela code. Pada jendela code terdapat dua buah combo yang berada disebelah kiri dan kanan atas. Combo disebelah kiri atas berisi daftar control yang terdapat dalam sebuah form, sedangkan combo yang berada disebelah kanan atas merupakan daftar event dari control tersebut.

Karena kita membutuhkan event ketika cmdTutup di click, maka di combo kiri atas kita pilih cmdTutup, sedangkan combo sebelah kanan atas kita pilih click (karena kita mendouble click tombol cmdtutup, langkah ini tidak perlu dilakukan, karena secara otomatis VB akan mengarahkan code pada cmdTutup dan setting event default dari command button yakni event click.

Setting even default tergantung pada jenis komponen yang digunakan, jika menggunakan textbox maka setting defaultnya ada pada change, sedangkan untuk combo setting defaultnya ada pada click.

Sebuah event dalam jendela code ini ditandai dengan kalang pembuka dan kalang penutup. Pengguna tidak bisa membuat prosedur yang berkaitan dengan event yang diinginkan jika berada dalam 2 kalang ini. Diawali dengan private sub dan diakhiri dengan end sub
  • Pada kalang cmd tutup_click Tambahkan teks “unload me”
Unload berarti perintah untuk menutup, me adalah penunjuk ke form yang sedang aktif sekarang. Karena cmdtutup merupakan komponen dari frmbarang. Maka saat perintah unload me dipanggil compiler akan langsung menjalankan perintah tutup form frmbarang yang sedang aktif.
  • sehingga akan nampak seperti ini:
Kode untuk menutup form

0 komentar:

Posting Komentar