Tutorial VB.Net #18: Menggunakan Event MouseDown, MouseEnter, MouseLeave, MouseUp – priacoding. Pada postikan kali ini priacoding akan menunjukan sebuah trik mempercantik tampilan aplikasi sekaligus memanipulasi user he he.. :D :D
Yaitu dengan menggunakan event MouseDown, MouseEnter, MouseLeave dan MouseUp. MouseDown adalah ketika cursor sedang klik tetapi belum di lepas, MouseEnter adalah ketika cursor melewati object, MouseLeave adalah ketika cursor tidak menyentuh apapun atau default dan MouseUp adalah ketika cursor telah selesai mengklik suatu object.
Baik langsung saja, ikuti langkah-langkah nya..
Disini priacoding sudah menyiapkan 3 buah gambar dengan ukuran yang sama dan menyerupai button, seperti di bawah.
Keterangan :
Nama gambar 1 : pbbarang1
Nama gambar 2 : pbbarang2
Nama gambar 3 : pbbarang3
Nama gambar 1 : pbbarang1
Nama gambar 2 : pbbarang2
Nama gambar 3 : pbbarang3
1. Tambahkan satu buah Picturebox ke dalam project VB.NET anda dan masukan 3 buah gambar yang telah di siapkan tadi, kira-kira seperti gambar di bawah.
2. Masuk ke tahap pengcodingan langsung saja pastekan coding di bawah gaes..
Private Sub PictureBox1_MouseDown(sender As Object, e As MouseEventArgs) Handles PictureBox1.MouseDown Me.PictureBox1.Image = My.Resources.pbbarang3 End Sub Private Sub PictureBox1_MouseEnter(sender As Object, e As EventArgs) Handles PictureBox1.MouseEnter Me.PictureBox1.Image = My.Resources.pbbarang2 End Sub Private Sub PictureBox1_MouseLeave(sender As Object, e As EventArgs) Handles PictureBox1.MouseLeave Me.PictureBox1.Image = My.Resources.pbbarang1 End Sub Private Sub PictureBox1_MouseUp(sender As Object, e As MouseEventArgs) Handles PictureBox1.MouseUp Me.PictureBox1.Image = My.Resources.pbbarang2 End Sub
3. Jalankan aplikasi maka akan menghasilkan seperti gambar di bawah
Penjelasan :
PictureBox1_MouseLeave adalah ketika cursor tidak menyentuh picturebox
PictureBox1_MouseEnter adalah ketika cursor melewati picturebox
PictureBox1_MouseDown adalah ketika picturebox di klik tetapi belum di lepas
PictureBox1_MouseUp adalah ketika cursor telah selesai mengklik picturebox
PictureBox1_MouseLeave adalah ketika cursor tidak menyentuh picturebox
PictureBox1_MouseEnter adalah ketika cursor melewati picturebox
PictureBox1_MouseDown adalah ketika picturebox di klik tetapi belum di lepas
PictureBox1_MouseUp adalah ketika cursor telah selesai mengklik picturebox
Jika anda mengikuti tutorial dengan benar maka hasilnya akan terlihat seperti sebuah tombol yang berbentuk 3D yang sedang di klik.
Pass: priacoding.com
Demikianlah tutorial trik menggunakan event MouseDown, MouseEnter, MouseLeave dan MouseUp pada VB.NET. semoga bermanfaat dan berjalan dengan semestinya. :D :D
Baca Juga:
- Tutorial VB.Net #11: Menggunakan PictureBox
- Tutorial VB.Net #17: Membuat Form Loading
- Tutorial VB.Net #19: Operasi Relasi (Pembanding) =, <>, >, <, >=, <=
Note |
Himbauan : Jika artikel ini memang berguna untuk teman-teman, MOHON artikel ini disharing kepada yang lain AGAR teman-teman kita juga mendapat manfaatnya. Terimakasih.. |