C# / VB.NET - Notify Icon [VB.NET]

Ho creato un'icona e un balloon che mi esce fuori, e fin qui funziona tutto, il problema è che l'icona mi rimane nella barra degli strumenti dopo che il messaggio scompare.. ho provato con .visible= false dopo il comando ma non funziona... quindi la domanda è come posso far sparire l'icona dalla barra strumenti dopo che ha fatto il suo dovere?

allego pezzo di codice

If x= 5 Then
        
Beep()
        
             Checked.Visible = True
            Checked.BalloonTipTitle = "FATTO"
            Checked.BalloonTipText ="Calcoli corretti"
            Checked.ShowBalloonTip(7)
        else
x=9
        
          End If

C'è il Timeout.
Dopo un tot di tempo scompare.

notifyIcon.ShowBalloonTip(1000, "Titolo", "Messaggio", ToolTipIcon.Info)

il "balloon" scompare, ma rimane l'icona nella barra strumenti...
se provo a dare:
checked.visible = false
non mi mostra più manco il baloon, ho provato a metterlo dopo .showballoontip ma non funziona...

Si.
Devi rilasciare la risorsa.

Inserisci notifyIcon.Dispose() all'evento FormClosed.

scusami, mi son dimenticato una parte fondamentale mi sa'... il tutto è in un thread che è in un loop:

Private Sub ThreadTask()
        Do
          If x = 5 Then
        
         Beep()
        
        
             Checked.Visible = True
            Checked.BalloonTipTitle = "FATTO"
            Checked.BalloonTipText ="Calcoli corretti"
            Checked.ShowBalloonTip(7)
            
          Else
              x = 9
              Checked.Visible = False
            
          End If
         
          Thread.Sleep(10000) 'dieci minuti = 600000
         
        Loop
        
    End Sub    


quindi quando lui ha "controllato" i conti dovrebbe mostrare il balloon, che esce dall'icona che diventa visibile nella barra degli strumenti, dopodichè, sparisce il balloon, e dovrebbe sparire anche l'icona, per poi comparire al prossimo controllo...

Prima della Sleep aggiungi una

Application.DoEvents()

Così? ho provato ma non va', neanche (mi parve strano) solo con applicatio.DoEvents()....



Private Sub ThreadTask()
Do
If x = 5 Then

Beep()


Checked.Visible = True
Checked.BalloonTipTitle = "FATTO"
Checked.BalloonTipText ="Calcoli corretti"
Checked.ShowBalloonTip(7)

Else
x = 9
Checked.Visible = False

End If
Application.DoEvents()
checked.visible. = false
Thread.Sleep(10000) 'dieci minuti = 600000

Loop

End Sub

Private Sub ThreadTask() 
        Do 
               If x = 5 Then 
                 
                Beep() 
                 
                 
               Checked.Visible = True 
            Checked.BalloonTipTitle = "FATTO" 
            Checked.BalloonTipText ="Calcoli corretti" 
            Checked.ShowBalloonTip(7) 
             
               Else 
                   x = 9 
                   Checked.Visible = False 
             
               End If 
               Application.DoEvents() 
               checked.visible. = false 
               Thread.Sleep(10000) 'dieci minuti = 600000 
               
        Loop 
         
    End Sub  

Alcune cose non sono chiare.

Do If x = 5 Then

presumo che x sia una variabile pubblica.
e che quando il suo valore è 5 avvia il contenuto nella condizione.

Ma l'operazione viene continuamente ripetuta se la variabile x e sempre uguale 5

alla fine del Checked.ShowBalloonTip(7) dovresti aumentare o resettare il valore di x per fermare il ciclo.

in questo modo.

Private Sub ThreadTask() 
        Do 
               If x = 5 Then 
                 
                Beep() 
                 
                 
               Checked.Visible = True 
            Checked.BalloonTipTitle = "FATTO" 
            Checked.BalloonTipText ="Calcoli corretti" 
            Checked.ShowBalloonTip(7) 
            x = 0  'resetta la variabile x
             
               Else 
                   x = 9 
                   Checked.Visible = False 
             
               End If 
               Application.DoEvents() 
               checked.visible. = false 
               Thread.Sleep(10000) 'dieci minuti = 600000 
               
        Loop 
         
    End Sub