Cara Membuat Menu PopUp di Visual Basic 6.0 - Pada pertemuan kali ini tip dan trik Visual Basic akan mengulas sebuah artikel yang berjudul Cara Membuat Menu PopUp di Visual Basic 6.0. Tentu kita sudah tau menu po-up itu seperti apa, sebenarnya menu pop-up sering kita temukan pada saat kita sedang mengoperasikan suatu program, misal program Ms.Office. Dengan MS Office Anda bisa memunculkan menu pop-up dengan cara klik kanan, maka akan muncul sebuah menu yang terdiri dari pilihan beberapa menu. Itulah menu pop-up.
Di visual basic inipun Anda bisa membuat menu tersebut dengan mudah tanpa embel-embel kode pemograman yang panjang. Sebelum kita membuat menu pop-up mari kita bahas pengertian dari menu pop-up itu sendiri.
Menu PopUp adalah menu yang tersembunyi dan tidak terlihat dalam program, namun dapat dimunculkan sewaktu-waktu. Menu PopUp biasanya ditampilkan saat tombol kanan mouse ditekan oleh pengguna.
Dari pengertian diatas mari kita simak sama-sama bagaimana cara membuat menu pop-up di visual basic 6.0. Misalnya kita ingin membuat Menu PopUp dengan aturan sebagai berikut :
-Ada tiga Menu PopUp, yaitu File, Edit dan About
-Ketiga Menu terebut muncul saat tombol mouse sebelah kanan di klik diatas form
-Berikut contoh gamabar dari Menu Pop-up
 |
| Menu PopUp |
Untuk membuat menu seperti gambar diatas, lakukanlah langkah-langkah berikut dibawah ini:
-Buatlah Project Standar baru
-Klik nama form dalam jendela Project Explorer
-Klik menu View pada menu bar, lalu klik Object
-Klik Tools pada menu bar, lalu klik Menu Editor, sehingga muncul jendela Menu Editor
-Ketik kata menupopup pada kotak isian caption, lalu ketik kata mnu_popup dalam kotak isian Name
-Penting : Non-aktifkan kotak ceklist Visible
-Klik tombol Next untuk membuat menu lainnya
-Ketikan kata &File pada kotak isian caption, lalu ketikan kata mnu_file dalam kotak isian Name
-Klik tombol arah panah -> untuk menandakan bahwa menu file merupakan bagian dari menu PopUp.
-Klik tombol Next untuk membuat menu lainnya
-Ketikan kata &Edit pada kotak isian caption, lalu ketikan kata mnu_edit dalam kotak isian Name
-Klik tombol Next untuk membuat menu lainnya
-Ketikan kata &About pada kotak isian caption, lalu ketikan kata mnu_about dalam kotak isian Name
-Klik tombol OK untuk menutup menu jendela Menu Editor
-Terakhir buka jendela kode program dengan F7 lalu ketik kode program berikut dibawah ini :
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = 2 Then
PopupMenu mnu_popup
End If
End Sub
- Jalankankan program untuk melihat hasilnya.
Setelah kita berhasil membuat menu Pop-Up.Sekarang kita akan belajar memasang hasil dari pada pemilihan menu yang ada di menu pop-up misalnya ketika kita klik kanan pada form setelah itu muncul menu Pop-Up lalu kita pilih Exit maka form akan keluar. Berikut adalah kodenya :
Private Sub mnu_exit_Click()
Unload Me 'kode program untuk keluar
End Sub
Begitupun pada file lainnya yaitu File, Edit dan About :
Private Sub mnu_file_Click()
'tulis kode program disini
End Sub
Private Sub mnu_edit_Click()
'tulis kode program disini
End Sub
Private Sub mnu_about_Click()
'tulis kode program disini
End Sub
Demikian artikel tentang Cara Membuat Menu PopUp di Visual Basic 6.0. Semoga bermanfaat buat kita semua dan dapat menambah wawasan pengetahuan pemograman VB kita. Terimaksih.
No comments:
Post a Comment