Bonsoir !
Je suis en train de réalisé un jeu awalé sur vba avec deux options: 1 joueur contre le pc et l'autre option : deux joueurs.
J'ai un soucis c'est que je suis pas trés bon j'ai fait tout ce qui était mis en forme mais j'ai un problème sur ma boucle.
Je pense qu'il y a plus simple et plus rapide ça va faire quelques temps que je suis dessus. Voici mon code ; j'ai 12 commandbutton et ça doit s'incrémenter automatiquement pour les deux joueurs chacun leur tour.

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
17
18
19
20
21
22
23
24
25
26
27
28
Private Sub CommandButton1_Click()
    If TextBox1.Value = 4 Then
TextBox1.Value = 0
TextBox2.Value = TextBox2 + 1
TextBox3.Value = TextBox3 + 1
TextBox4.Value = TextBox4 + 1
TextBox5.Value = TextBox5 + 1
 
    If TextBox1.Value = 5 Then
TextBox1.Value = 0
TextBox2.Value = TextBox2 + 1
TextBox3.Value = TextBox3 + 1
TextBox4.Value = TextBox4 + 1
TextBox5.Value = TextBox5 + 1
TextBox6.Value = TextBox6 + 1
 
 If TextBox1.Value = 6 Then
TextBox1.Value = 0
TextBox2.Value = TextBox2 + 1
TextBox3.Value = TextBox3 + 1
TextBox4.Value = TextBox4 + 1
TextBox5.Value = TextBox5 + 1
TextBox6.Value = TextBox6 + 1
TextBox7.Value = TextBox7 + 1
 
End If
 
End Sub
Merci de votre aide d'avance (si vous souhaitez je peux l'envoyer car à expliquer c'est un peu compliquer). Merci