Public Class Form1
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
NotifyIcon1.Visible = False
End Sub
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
NotifyIcon1.Visible = True
NotifyIcon1.BalloonTipIcon = ToolTipIcon.Info
NotifyIcon1.BalloonTipText = "Application working..."
NotifyIcon1.BalloonTipTitle = "TrayIcon example application"
NotifyIcon1.ShowBalloonTip(2000)
End Sub
Private Sub ShowToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles ShowToolStripMenuItem.Click
Show()
End Sub
Private Sub HideToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles HideToolStripMenuItem.Click
Hide()
End Sub
Private Sub CloseToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles CloseToolStripMenuItem.Click
Close()
End Sub
End Class
Subscribe to:
Post Comments (Atom)
-
idiaryonline posted: "I have kept a list of books that I have read during the past few years. Here it is < /hr> ...
-
hoakley posted: "Last week, I was asked the apparently simple question as to how to form the mathematical symbol commonly u...
No comments:
Post a Comment