Kikou tout le monde,

J'ai un problème vraiment de base avec un Timer sous VB.net

Quand je demande de lancer le timer par Timer.Start() directement, il n'a aucun problème mais quand j'intégre le code dans mon programme et que je passes par un Invoke pour appeler la fonction qui lance le Timer, l'event lié à l'objet n'est jamais levé !

Savez-vous me dire d'où cela pourrait venir ?

voici le code :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Public Class Job
    WithEvents Chk_End_Ana As New Timer()
 
    Public Sub New()
        Chk_End_Ana.Enabled = True
        Chk_End_Ana.Stop()
        Chk_End_Ana.Interval = 1000
    End Sub
 
    Public sub Action()
        'faire plient de truc
        Chk_End_Ana.Start()
    End Sub
 
    Public Sub Chk_End_Ana_Tick() Handles Chk_End_Ana.Tick
        Debug.Print("Timer Event")
    End Sub
End Class
j'ai tenté de faire avec des Chk_End_Ana.Enable = True/False à la place de Start()/Stop(). J'ai également tenté de faire avec
Code : Sélectionner tout - Visualiser dans une fenêtre à part
AddHandler Chk_End_Ana.Tick, AddressOf Chk_End_Ana_Tick
Mais rien n'a changé, j'ai jamais l'event qui arrive avec un Invoke