while Fermé

Question

Bonjour,  

J'ai fait une application fenêtre en VB.NET et j'ai un gros problème. C'est un client et un serveur : le client envoie des messages au serveur qui, selon le message, va effectuer une action. Voici un tout petit bout :  

 If sMessageServer = "metallica" Then 
    Rage.Show() 
    Rage.WebBrowser1.Navigate("https://www.youtube.com/watch?v=bg92QpjRcJk") 
  End If 

Mais quand je fais une while comme ceci :  

Dim MaVariable As Integer 
While MaVariable 

If sMessageServer = "metallica" Then 
    Rage.Show() 
    Rage.WebBrowser1.Navigate("https://www.youtube.com/watch?v=bg92QpjRcJk") 
                End If 

End While 


l'action n'est pas effectuée 

Comment remédier à ce désagrément ? 

Merci beaucoup de votre aide 





Configuration: Windows 7 / Firefox 3.6.12

Michael_Ange · Answer

C'est normal , c'est à cause de ta condition....
Je m'explique :

Dim MaVariable As Integer

à initialisation de ta variable "MaVariable", celle-ci à pour valeur 0.
Le while s'assure que la condition est vérifiée avant d'exécuter la tache. Ta ligne While MaVariable peut s'écrire while 0, hors 0 ramène toujours la valeur 'False', c'est pour ça que ton morceau de code ne s'exécute pas.
Initialise "MaVariable" avec une autre valeur avant de lancer ta boucle...

exemple : 
Dim MaVariable As Integer
While MaVariable

MaVariable = 1

If sMessageServer = "metallica" Then...

Utilisateur anonyme · Answer

Merci, mais l'action ne s'execute toujours pas .
Et en passant j'ai une question : lorsque le client a envoyé son message, il reste gelé, il ne fait plus rien, il n'y a meme pas affiché en haut  (Ne répond plus). Quel est le probleme ?

Merci de ton aide

While

2 réponses

Discussions similaires