Discussion :

[cabiste007]

bonjour ou bonsoir!!
comme indique le titre je voudrais savoir comment fonctionne la fonction sleep? car son compotement quand je l'écrie dans mon appli
voici un petit exemple

Code :

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

1
2
3
4
5
6
Private Declare Sub Sleep Lib "kernel32.dll" (ByVal dwMilliseconds As Long)
Private Sub Form_Load()
Label1.Caption = 1
Sleep 3000
Label1.Caption = 2
End Sub

ici en principe quand je démarre l’exécution l'appli pause pendant 3 sec et affiche 2 dans la label1 alors que l'appli doit afficher 1 puis pause 3 sec et affiche 2
merci bien de m'expliquer comment sa fonctionne

[Selve]

Bonjour

Code :

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

1
2
3
4
5
6
7
Private Declare Sub Sleep Lib "kernel32.dll" (ByVal dwMilliseconds As Long)
Private Sub Form_Load()
Label1.Caption = 1
Me.refresh ' rafraichissement affichage
Sleep 3000
Label1.Caption = 2
End Sub

[DarkVader]

Bonjour,
Sleep passe la main aux autres applications et empêche toute gestion durant le temps déterminé.
En conséquence l'instruction fige l'application.

Voir l'exemple suivant qui compare avec l'instruction Wait de la librairie vb6i qui elle n'effectue une pose qu'au niveau procédural
sans empêcher la récupération des évènements de l'application

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
Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
 
Private Sub Form_Load()
    Me.AutoRedraw = True
End Sub
 
Private Sub Form_Activate()
    Sleep 5000
    Me.Print "OK after Sleep"
 
    Me.Print "MOVE ME"
 
    Wait 5000
    Me.Print "OK after Wait"
 
End Sub