Sebenarnya sudah banyak artikel tentang tutorial ini, tetapi mungkin tidak ada salahnya jika saya ulas lagi, lumayan buat update postingan, hehehe... monggo disimak.
1. Membuat menu
Yang memang betul-betul belum pernah membuat menu sebelumnya silakan simak ulasan singkatnya disini [http://vbjadul.wordpress.com/2010/06/02/cara-membuat-menu-pada-visual-basic-6-0/]
Tambahkan sebuah form ke project VB 6 Anda, atau gunakan form yang sudah ada, klik kanan pada form, pilih Menu Editor.
Kemudian susun seperti contoh dibawah ini :
Mengapa menu harus disusun bertingkat?
Karena menu dengan tingkat tertinggi yang akan kita panggil saat coding (dengan klik kanan) dan apabila menu tersebut tidak memiliki level dibawahnya akan terjadi bug dengan command dibawah ini saat menu tersebut dipanggil.
2. Coding Memanggil menu dengan klik kanan
Private Sub List1_MouseDown(Button As Integer, Shift As Integer, _
X As Single, Y As Single)
If Button And vbRightButton Then
PopupMenu mnuListPopup
End If
End Sub
3. Coding Memanggil menu dengan tombol menu "pada keyboard"
Private Sub List1_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = 93 Then
PopupMenu mnuListPopup
End If
End Sub
Keterangan : code yang berwarna merah adalah nama (name) dari menu yang akan kita panggil menggunakan kilk kanan atau tombol menu, sesuaikan dengan menu Anda dengan men-cocok-kannya dengan menu editor.
Demikian semoga bermanfaat.
Contoh source code :
http://www.ziddu.com/download/19513844/popmenu.rar.html
Update Contact :
No Wa/Telepon (puat) : 085267792168
No Wa/Telepon (fajar) : 085369237896
Email : Fajarudinsidik@gmail.com
No Wa/Telepon (puat) : 085267792168
No Wa/Telepon (fajar) : 085369237896
Email: Fajarudinsidik@gmail.com
atau Kirimkan Private messanger melalui email dengan klik tombol order dibawah ini :
