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 :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
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 ClassMais rien n'a changé, j'ai jamais l'event qui arrive avec un Invoke
Code : Sélectionner tout - Visualiser dans une fenêtre à part AddHandler Chk_End_Ana.Tick, AddressOf Chk_End_Ana_Tick
Partager