Pernahkah anda membuat program yang punya icon kecil pada taksbar? seperti avira, winamp dan lain-lain? itu dinamakan notifyicon yang disediakan oleh visual basic .net kepada programmer, sangat mudah digunakan, dan sangat cantik bila diterapkan, udah gak sabar ne pengen buat, kamu? sabar dong, baca tutorial dibawah ini .. hehehehehehehe
1. Langkah Pertama, Buatlah sebuah project baru dan design seperti dibawah ini, gak usah mirip-mirip kalipun jadi la,,, hehehehe
2. Langkah Kedua masukkan komponen notifyicon kedalam project, dengan cara mendrag komponennya kedalam form, liat gini caranya...... (sok pande) whwhwhwhwh
jika sudah masuk kedalam form, nnt tampilannya seperti dibawah ini ...
3. Langkah ketiga, masukkan sebuah komponen contextmenu kedalam form, lihat juga gambar dibawah ini :
4. Setelah masuk, klik komponen notify icon yang telah ada dalam form, dan carilah file *.ico (icon) yang diingingkan.
yang harus diingat adalah, file yang dimasukkan haruslah ber type *.ico, apabila bertipe lain maka kemungkinan besar akan terjadi error... hehehe
apabila tidak terjadi error apa-apa, maka icon akan terlihat pada jendela properties.
5. Langkah kelima, klik contextmenu dan dan rancanglah menu sesuai keinginan, atau seperti dibawah ini :
6. Kemudian double klik pada context menu tampil, dan isikan kode dibawah ini :
Me.Show()
NotifyIcon1.Visible = False
7. Kemudian double klik pada context menu exit, dan isikan kode dibawah ini :
End
8. Kemudian pada event mouse_clice kontrol notifyicon ketikkan kode dibawah ini :
If e.Button = Windows.Forms.MouseButtons.Right Then
ContextMenuStrip1.Show(MousePosition)
End If
9. Kode lengkapnya seperti dibawah ini :
Public Class Form1
Private Sub TampilToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles TampilToolStripMenuItem.Click
Me.Show()
NotifyIcon1.Visible = False
End Sub
Private Sub ExitToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles ExitToolStripMenuItem.Click
End
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles
Button1.Click
Me.Hide()
NotifyIcon1.Visible = True
End Sub
Private Sub NotifyIcon1_MouseClick(ByVal sender As Object, ByVal e As
System.Windows.Forms.MouseEventArgs) Handles NotifyIcon1.MouseClick
If e.Button = Windows.Forms.MouseButtons.Right Then
ContextMenuStrip1.Show(MousePosition)
End If
End Sub
Private Sub Form1_Disposed(ByVal sender As Object, ByVal e As System.EventArgs) Handles
Me.Disposed
NotifyIcon1.Dispose()
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles
MyBase.Load
NotifyIcon1.Visible = False
End Sub
End Class
sebenarnya membuatnya sangat mudah, tapi membuat tutorialnya memang agak panjang,, wkwkwkwkwkw
klw teman-teman mau download source codenya klik link dibawah ini :
(* artikel dan source code program oleh visualbasic-indonesia
Comments
Post a Comment