programmer visual basic 2010 Fermé

Question

Bonjour, 

Bonjour, 

je suis entrain de créer un petit jeu sur Visual basic mais je suis bloquer a un niveau, je souhaite créer des code qui remplace les labels comme le schéma l'explique. 


lien du schéma: http://tinypic.com/images/goodbye.jpg 

merci de m'aider svp 




Configuration: Windows Vista / Safari 534.30

amateur_gadget · Answer

Supposons que t'as 4 labels : label1,label2,label3,label4 
tu vas tout simplement jouer sur leur contenu et pour le label qui tu désire le supprimer tu peux simplement le cacher avec la methode hide() en faite tu peux faire : 
label1.Text = label2.Text 
label2.Text = label3.Text 
label3.Text= label4.Text 
et enfin label4.hide() sinon t'as pas besoin de le faire car le nom va etre affecter au label 
avec : label4.Text = textBox2.Text 
j'espere que ça te donne une idée et tu peux l'améliorer avec un switch par exemple bonne continuation :)

bekaman · Answer

bonjour 

j'ai fait 

la methode hide() en faite tu peux faire : 
label1.Text = label2.Text 
label2.Text = label3.Text 
label3.Text= label4.Text 
label4.Text = textBox2.Text 

mais quand je teste le programme se n'est pas comme je souhaite ça me montre le même texte que j'ai entrer sur tout les label, 

or je voulais que le label1.text soit remplacé par le label2.text et le label2.text soit remplacé par le label3.text ainsi de suite. et enfin le label4.text soit remplacé pas le mot entré dans la textbox..

je ne connait pas comment fonction es switch. 
svp aidez moi 
merci

Lord Zero · Answer

Salut, j'ai trouver une solution, le probleme je l'ai faite en vb6 mais bonne nouvelle les languages se ressemble et le code n'est pas compliqué. Private Sub Command1_Click() If Label1.Caption = "" Then Label1.Caption = Text1.Text Else If Label1.Caption <> "" And Label2.Caption = "" Then Label2.Caption = Text1.Text Else If Label1.Caption <> "" And Label2.Caption <> "" And Label3.Caption = "" Then Label3.Caption = Text1.Text Else If Label1.Caption <> "" And Label2.Caption <> "" And Label3.Caption <> "" And Label4.Caption = "" Then Label4.Caption = Text1.Text Else If Label1.Caption <> "" And Label2.Caption <> "" And Label3.Caption <> "" And Label4.Caption <> "" Then Label1.Caption = Label2.Caption Label2.Caption = Label3.Caption Label3.Caption = Label4.Caption Label4.Caption = Text1.Text End If End If End If End If End If End Sub Voici comment se comporte le code : Il fonctionne sur le principe de condition, a chaque fois qu'une condition est rempli, il passe à la suivante. En gros pour chaque condition voici comment ça se passe : Condition 1 : si le label1 est vide tu lui donne une valeur Condition 2 : si le label1 est différent (non vide) et label 2 est vide, tu donne une valeur au label2 etc... et pour finir à la derniere condition, si tout les label sont rempli, on donnera au label1 la valeur du label2, au label2 la valeur du label3 etc... et au label4 la valeur de la zone de texte. si tu as du mal a le mettre en vb.net (mais j'en doute), je pourrais te le retranscrire lundi. A+

bekaman · Answer

bonjour 

merci lord zéro, efficace le nouveau code il marche très bien merci beaucoup. mais j'ai un autre gros problème pour mettre les mots de passe sur mon application s'il te plais si tu connait le code aide moi. 



je souhaite mettre 4 clef d'activation. qui ne peuvent être utiliser une fois et à tour de rôle , par un utilisateur. 

j'explique si 

si j'entre dans le jeu avec le code n°1, si je sort du jeu ou si je copie le jeu sur un autre pc il me faudra absolument le code n°2 pour entrer dans le jeu. et si je sort encore du jeu il me faudra absolument le code n°3, ainsi de suite jusqu'au 4eme code. et après avoir utilisé le 4eme code, le cycle de code recommence donc il te faudra le code n°1. 

j'ai essayer avec le la condition " if" mais ça ne marche pas j'ai fait ça 


if  (txt_box.text= code1,code2,code3,code4) then 
    
     l'instruction est exécuté

eslse 
 
   l'instruction n'est pas exécuté

end if


mais ça ne marche pas il ya plein d'erreurs qui apparaissent. 

aidee moi svp.

Programmer visual basic 2010

4 réponses

Discussions similaires