VB タスクトレイのアイコンのクリックに反応する

タスクトレイのアイコンのクリックに反応する

１．タスクトレイのアイコンがクリックされたらフォームを表示する例

以下の例では、フォームにNotifyIcon1が配置されていて、タスクトレイにアイコンを表示する設定になっていることが前提。

Private Sub NotifyIcon1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles NotifyIcon1.Click

    Me.Show()

End Sub

　

以下の例では、プログラムで作成したNotifyIconのクリックに反応する。

Button1をクリックするとタスクトレイにアイコンが表示される。フォームを最小化してタスクトレイのアイコンをクリックするとフォームが標準の大きさで表示される。

Dim TaskIcon As New NotifyIcon

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

    'アイコンを表示する
    TaskIcon.Icon = New Icon("C:\Sample1.ico")
    AddHandler TaskIcon.Click, AddressOf TaskIcon_Click
    TaskIcon.Visible = True

End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

    'アイコンの表示を消す
    TaskIcon.Visible = False

End Sub

Private Sub TaskIcon_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)

    Me.WindowState = FormWindowState.Normal

End Sub

　

２．タスクトレイのアイコンがダブルクリックされたらフォームを表示する例

以下の例では、フォームにNotifyIcon1が配置されていて、タスクトレイにアイコンを表示する設定になっていることが前提。

Private Sub NotifyIcon1_DoubleClick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles NotifyIcon1.DoubleClick

Me.WindowState = FormWindowState.Normal

End Sub