Bonjour,

Je voudrais afficher dans une form des valeurs calculées par un thread.

Le thread s'occupe de lire les données qui arrivent sur le port série. Celles-ci sont stockées dans la variable globale m.

Je pensais qu'il suffirait d'attribuer au textbox TB01 qui se trouve dans la form1 la valeur de m. (tb01.text = m). Mais apparemment cela ne fonctionne pas.

Comment peut-on récupérer dans une form des valeurs calculées dans un thread ?

Dans l'exemple ci-dessous, le thread calcule la date et heure du jour. Je voudrais afficher la valeur de hrm dans le textbox TB01.

Merci pour votre aide.

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
19
20
21
22
23
Imports System.Threading
 
Public Class Form1
    Dim th1 As Thread
 
    Private Sub CB01_Click
        th1 = New Thread(AddressOf HEURE01)
        Timer1.Interval = 3000
        Timer1.Enabled = True
    End Sub
 
    Private Sub HEURE01()
        Dim i As Integer = 1
        do
            hrm = DateTime.Now.ToString
            Thread.Sleep(1000)
        loop
    End Sub
 
    Private Sub Timer1_Tick
        TB01.Text = hrm
    End Sub
End Class