Bonjour,

Le but est d'afficher dans une TextBox une valeur en cours d'évolution au sein de boucles For.
La succession des différentes valeurs est très rapide et cela les rend illisibles, mais ça permet de voir que le "compteur" tourne.

J'utilise le code suivant :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim R As Long = 0
        For i As Integer = 0 To 10
            For j As Integer = 0 To 5000
                R += i + j
                TextBox1.Text = R
                TextBox1.Refresh()
            Next i
        Next j
    End Sub
Ce code donne bien l'effet attendu grâce à la ligne TextBox1.Refresh(). Sans elle, seule la dernière valeur affectée est visible après le dernier tour de boucle, comme si la ligne TextBox1.Text = R avait été placée après la ligne Next j. Tout cela est bien normal, je le comprends.

La solution du TextBox1.Refresh() n'est parait-il pas la meilleure.

Quelqu'un peut-il me donner un exemple de code qui serait une meilleure solution ?

Merci d'avance,

Sam