Problème d'execution des instructionsRésolu

Question

Bonjours à tous, je suis débutant en VB et j'ai rencontré un problème que je n'arrive pas à expliquer:

Private SubForm_Initialize()

    FrmMain.WindowState =
2              
              
              
             ' Feuille en plein écran

    Sleep
(2000)              
              
              
              
                   ' Attend 2 sec

    LblHeader.Caption =
"Starting system..."           
              
           ' Affiche le texte

    Sleep
(2000)           
           
           
           
           
           
       ' Attend 2 sec

    CallStartBeep  
              
              
              
              
              ' genere un beep système
End Sub


Lorsque j'execute le code suivant, les instructions sont executées dans le désordre, plus précisement,

les fonctions API sont effectuées avant les instructions classiques.

Voilà, si quelqu'un pouvait m'en expliquer la raison, voir la solution, ca serai sympa.


Merci à vous. Polux

cs_Exploreur · Accepted Answer

Re,

Après réflexion et essais, le Form_Initialise s'exécute avant le Form_Load ou Form_Activate, donc normal car rien n'est encore chargé...Essaye ton code dans le Form_Load ou Form_Activate...

A+
Exploreur

 Linux a un noyau, Windows un pépin

cs_Exploreur · Answer

Salut,

Essaye cela :

Private SubForm_Initialize()
DoEvents
....
......
.......
.....
End Sub
A+
Exploreur

 Linux a un noyau, Windows un pépin

poluxworld · Answer

Bonjours Exploreur,
j'ai déjà essayé DoEvents avant et après chaque instruction et il n'y a pas de changement.
Je ne comprend vraiment pas ce qui peut ce passer.

Merci d'avoir répondu, A+

poluxworld · Answer

Merci Exploreur,
effectivement, en remplacant Form_Initialise par Form_Activate cela fonctionne correctement.
Par contre, Form_Load pose le même problème.

Merci encore de m'avoir éclairé. Polux

poluxworld · Answer

PS: Ne pas oublier DoEvents après les instructions.

Problème d'execution des instructions

5 réponses

Votre réponse