Kamis, 31 Mei 2012

VB Pemula Step 14 - Membuat Menu

wah, lama juga ya ga postingan ....
hampir saja blog ini terabaikan :)
sebelumnya mohon maaf bagi para pembaca, insta Allah tutorial tentang Visual Basic akan di update hingga selesai.
okay, cekidot.....
kita lanjut ke tutorial berikutnya, yaitu cara membuat menu...

Anda tahu menu kan? Setiap Anda membuka aplikasi (yang ada menunya) biasanya terdapat MenuBar. Anda lihat di browser Anda di bagian atas. Ya... itulah menu. Dalam VB juga terdapat objek menu.

Tapi, bagaimana cara membuatnya? Kan tidak ada di ToolBox??? Tenang dulu! Memang tidak ada di ToolBox. Karena Menu bukanlah objek yang bisa di-insert dan di-move sesuka hati seperti objek lainnya. Cara meng-insert-nyapun agak sedikit berbeda.

Okay, stop basa-basinya, sekarang kita mulai demo memulai menu. Yu mari....

1. Buka kembali project yang telah Anda buat pada Tutorial 13!.

2. Buka MDIForm1 dengan cara mendobelklik MDIForm1 pada Panel Project sebelah kanan-atas!

3. Klik kanan pada area kosong di MDIForm1! Pada menu yang keluar, pilih Menu Editor! Sebuah jendela baru akan keluar.

 

4. Pertama, kita akan membuat menu View. Isi bagian Caption dengan View dan Name dengan menuView. (masih ingatkah Anda dengan perbedaan antara Name dan Caption? Baca kembali Tutorial 3) Sedangkan yang lainnya, dibiarkan juga tidak apa-apa. Kemudian klik Insert!
 
5. Kemudian, buatlah menu lainnya:

Caption
Name
a.
Window
menuWindow
b.
Exit
menuExit
c.
Form1
menuForm1
d.
Form2
menuForm2
e.
Cascade
menuCascade
f.
Tile Vertical
menuVTile
g.
Tile Horizontal
menuHTile

 
6. Setelah Anda selesai membuat menu-menu di atas, Anda perlu menyusunnya dulu dong.... Lihat saja susunannya, acak-acakkan bukan?
 
7. Untuk menyusunnya, Anda bisa memanfaatkan tombol-tombol panah yang ada di sebelah kiri tombol Next. Ada panah ke atas, bawah, kanan, kiri. Tombol atas-bawah untuk mengubah urutan menu, sedangkan kanan-kiri untuk mengubah tingkatan menu.

8. Susunlah menjadi seperti ini:

9. Klik OK. Menu akan ditampilkan pada MDIForm. Anda juga dapat melihat sub-sub menunya juga.

10. Sekarang, saatnya coding..... yeah....

11. Sebelumnya kita pernah menambahkan kode pada saat MDIForm1_Load bukan? Nah... kita modifikasi kodenya menjadi seperti berikut:
Form1.Visible = False
Form2.Visible = False
Ini fungsinya untuk menyembunyikan Form1 dan Form2. (Saat pertama, jangan tampil dulu.. nggak rame dong...)

12. Pertama, kita akan menambahkan kode pada saat menuForm1_Click. Tambahkan kode berikut ini:
If Form1.Visible = False Then
Form1.Show
menuForm1.Checked = True
Else
Form1.Hide
menuForm1.Checked = False
End If
Anda bisa terjemahkan sendiri kan? Kita sudah belajar mengenai perintah IF pada tutorial sebelumnya. Jadi, mulai sekarang, penulis sudah menanggap Anda menguasainya. Jika Anda lupa, Anda bisa membuaka kembali tutorial tentang perintah IF....ELSEIF...THEN....ELSE.

13. Tambahkan perintah serupa pada saat menuForm2_Click! Jadinya seperti ini:

14. Sekarang, giliran menambahkan perintah pada saat menuCascade_Click, menuVTile_Click, dan menuHTile_Click. Tambahkan kode berikut:

 
Nah... kalau yang satu ini perlu dijelaskan. Betul? Di sini kita menggunakan perintah Arrange. Perintah ini fungsinya untuk menyusun/menata letak MDIChild. Perintah ini hanya bisa diterapkan dalam MDIForm saja. Strukturnya adalah:
Arrange
Dimana ada tiga macam, yaitu: vbCascade, vbTileVertical, dan vbTileHorizontal.
15. Terakhir, tinggal menambahkan perintah pada saat menuExit_Click. Kita akan menampilkan MessageBox berupa pertanyaan. Perintahnya sebagai berikut:
y = MsgBox("Anda yakin mau exit?", vbYesNo, "PERTANYAAN")
If y = vbYes Then
End
End If
Penjelasan: untuk perintah pada baris pertama, fungsinya untuk menampilkan pertanyaan dengan tipe Yes/No. Jika y = vbYes atau tombol yang ditekan adalah Yes, maka program akan End. Jika y = vbNo??? Ya tidak terjadi apapun toh... ; )
Coba jalankan program Anda! Cobalah semua menu yang ada? Apakah berfungsi sesuai dengan perintah?
Nah.... itulah salah satu contoh program sederhana yang memanfaatkan MDIForm dan Menu. Pada tutorial selanjutnya, kita akan membuat Form Indah, dengan memanfaatkan PictureBox, Frame, Image.
Have fun.... ; )

1 komentar: