uhm...l'unload dovrebbe essere questo:
come devo procedere?
grazie
codice:
Private Sub form_unload(cancel As Integer)
    bCancel = True

    'unregister hotkey
    Call UnregisterHotKey(Me.hwnd, &HBFFF&)
      
    'remove the icon
    TrayI.cbSize = Len(TrayI)
    TrayI.hwnd = pichook.hwnd
    TrayI.uId = 1&
    Shell_NotifyIcon NIM_DELETE, TrayI
    End

End Sub