mon premier thread

Bonjour,

je suis entrain de créer mon premier thread .

J'ai une fenetre dans laquelle je change la valeur d'une texte box puis je fais une tempo de 2 secondes avant de fermer ma fenetre
=> si je n'utilise pas de thread, ma texbox devient un champ blanc et vide

voici ma classe :

Code:

---

1 2 3 4 5 6 7 8 9 10 11

Public Class ThreadTimer private pTimer As Integer   Sub New(myTimer As Integer) pTimer = myTimer End Sub   Public Sub Main() Thread.Sleep(pTimer) ' bloque le programe pendant 1sec End sub End Class

---

voici comment j'utilise mon thread

Code:

---

1 2 3 4 5 6 7 8 9 10 11

Me.label1.Text = "Vérification terminée"   Dim myObjThread As ThreadTimer = New ThreadTimer(2000) 'tempo de 2 sec Dim t As Thread = New Thread(AddressOf myObjThread.Main) t.Start   While t.ThreadState <> ThreadState.Stopped Application.DoEvents() End while   Me.Close

---

est-ce que c'est bien comme ça qu'il fallait faire ?

mouais ... c'est se compliquer la vie ... et avec du code moyennement propre


un simple

Code:

---

1 2 3

"verification terminée" system.threading.thread.sleep(2000) me.close

---

aurait suffit vu le cas
dans le pire des cas un timer qui ferait me.close

sperot51, ta soution ne fonctionne pas car comme je l'ai dit precedemment :

Citation:

---

Envoyé par Emcy

J'ai une fenetre dans laquelle je change la valeur d'une texte box puis je fais une tempo de 2 secondes avant de fermer ma fenetre
=> si je n'utilise pas de thread, ma texbox devient un champ blanc et vide

---

=> si on fait un sleep dans le programme principal, ça bloque le rafraichissement de la fenetre principale (c'est pourquoi ma textbox devient blanche)...

j'ai modifié un peu mon programme pour que ça soit plus propre :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

Sub StartTempo(myTimer As Integer) Dim t As Thread Dim myObjThread As ThreadTimer   myObjThread = New ThreadTimer(myTimer) 'tempo de 2 sec t = New Thread(AddressOf myObjThread.Main) t.Start   While t.ThreadState <> ThreadState.Stopped Application.DoEvents() End while End Sub

---

Code:

---

1 2 3 4

Me.label1.Text = "Vérification terminée" StartTempo(2000)   Me.Close

---

Et si tu appelais Application.DoEvents juste après avoir changé le contenu de ta textBox ?

ben la je comprends plus j'ai rajouté des fonctions dans mon programme et maintenant la textbox agi normalement avec system.threading.thread.sleep(2000) meme sans Application.DoEvents()