最小化機能がまだバーを表示しています

Question

タスクトレーに座っている単純なアプリケーションを作成しました。 PC名、IPV4アドレス、およびドメインが表示されます。ユーザーがアプリケーションを閉じると、EXITがコンテキストメスから選択されていない限り、トレイに閉じられるようにしました。それは全くうまくいった。それから私は何かを試すためにいくつかのコードを追加しました。一度取り外すと、アプリケーションはトレイに最小化を停止しました。これはコードが以前のものとまったく同じだから意味がありません。 maxmimizeボタンは無効になっているはずです。

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load 

    'Obtain Hostname and assign to label 
    strHostname = System.Net.Dns.GetHostName() 
    lblHostname.Text = strHostname.ToString 

    'Obtain IP Address and assign to label 
    Dim ipHostEntry = Dns.GetHostEntry(Dns.GetHostName) 
    Dim strIpAddress = ipHostEntry.AddressList.FirstOrDefault(Function(ip) ip.AddressFamily = AddressFamily.InterNetwork) 
    If strIpAddress IsNot Nothing Then 
     strIpAddress.ToString() 
    Else 
     lblIP.Text = "No IPV4 Address could be retrieved" 
    End If 

    lblIP.Text = strIpAddress.ToString 

    'Obtain Domain and assign to label 
    strDomain = Environment.UserDomainName 
    lblDomain.Text = strDomain.ToString 

End Sub 

Private Sub form1_Closing(sender As Object, e As System.ComponentModel.CancelEventArgs) Handles MyBase.Closing 

    'This checks to see if the form was closed by the MENU (Boolean = True) 
    ' or if the user selected "X" which will minimize to task tray 
    'This is needed because X cannot be disabled without losing Minimize function 

    If BoolClose = False Then 
     e.Cancel = True 
     WindowState = FormWindowState.Minimized 

    Else 
     End 
    End If 
End Sub 

Private Sub OpenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles OpenToolStripMenuItem.Click 

    WindowState = FormWindowState.Normal 

End Sub 

Private Sub NotifyIcon1_MouseClick(sender As Object, e As MouseEventArgs) Handles NotifyIcon1.MouseClick 
    WindowState = FormWindowState.Normal 
End Sub 

Answer 1

私はあなたのフォームのShowInTaskBarプロパティfalseに設定されていると思います。しかし、これは、システムトレイではなくタスクバーにアプリを表示します。たぶんthisがお手伝いします。