Discussion :

[mabelleau]

J'en suis à mes débuts avec vb2005. Je cherche à savoir comment faire pour que les boutons ou label puissent afficher leur nouvelle valeur avant d'arriver au end sub. La ligne System.Threading.Thread.Sleep(2000) me permet de voir si tout fonctionne correctement.

Voici un exemple de mon problème:

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
Public Class Form1
 
    Dim a As Integer
 
    Public Sub Bouton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Bouton.Click
 
        a = a + 1
        Bouton.Text = (a)
        Label1.Text = (a)
 
        System.Threading.Thread.Sleep(2000)
 
    End Sub
 
End Class

Salut, Marc André

[Invité]

Il faudrait rajouter un refresh sur controles.

[mabelleau]

Il faudrait rajouter un refresh sur controles.

Je n'ai pas la moindre idée de la facon de faire ce refresh. Je suis totalement nouveau en programmation. Ma dernière expérience remonte au temps du Dos et Windows en était à la version 3.1. C'est loin ca. Et l'orienté objet n'était pas dans le vocabulaire de la programmation. Je commence à m'y remettre.

Quelqu'un peut il me dire comment le faire ?

[Tnopy]

C'est simple tu utilise la méthode refresh des composants que tu souhaite forcer à se redessiner.

Dans ton code je te sugère d'initialiser quand même ta variable a du genre

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Dim a As Integer = 0

Ainsi que d'utiliser les balise CODE dans l'edition de ton message pour rendre ton code plus lisible.

[mabelleau]

Merci pour l'information. Ca marche numéro 1.

Marc André