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.... ; )
keren :)
BalasHapus