Sujet Précédent Sujet Suivant

Jeu du + ou -

Résolu/Fermé
milexarc Messages postés 92 Date d'inscription lundi 25 février 2013 Statut Membre Dernière intervention 2 décembre 2016 - 1 oct. 2014 à 20:03
milexarc Messages postés 92 Date d'inscription lundi 25 février 2013 Statut Membre Dernière intervention 2 décembre 2016 - 2 oct. 2014 à 00:13
Bonjour,


j'essaye de faire le jeu du + ou - en VBA. Cependant ma variable "score" ne veut pas s'incrémenter (elle reste bloqué à 1)

Comment puis-je corriger ce problème ?

Private Sub CommandButton1_Click()
Dim nombre As Integer
Dim score As Integer
score = 0


Label4.Caption = score
nombre = Range("A1").Value

If TextBox1.Value = nombre Then
MsgBox "tu as gagné ! Ton score :" & score

Label4.Caption = score
End If

If TextBox1.Value < nombre Then
MsgBox "le nombre auquel je pense est plus grand ! "

score = score + 1
Label4.Caption = score

End If

If TextBox1.Value > nombre Then
MsgBox "le nombre auquel je pense est plus petit !"
score = score + 1
Label4.Caption = score
End If

TextBox1.Value = ""
A voir également:

2 réponses

Réponse 1 / 2
Gyrus Messages postés 3334 Date d'inscription samedi 20 juillet 2013 Statut Membre Dernière intervention 9 décembre 2016 523
1 oct. 2014 à 20:36
Bonjour,

Essaie comme cela : 

Dim score As Integer
Private Sub CommandButton1_Click()
Dim nombre As Integer
    nombre = Range("A1").Value
    If CDbl(TextBox1.Value) = nombre Then
        MsgBox "tu as gagné ! Ton score :" & score
    ElseIf CDbl(TextBox1.Value) < nombre Then
        MsgBox "le nombre auquel je pense est plus grand ! "
        score = score + 1
    ElseIf CDbl(TextBox1.Value) > nombre Then
        MsgBox "le nombre auquel je pense est plus petit !"
        score = score + 1
    End If
    Label4.Caption = score
    TextBox1.Value = ""
End Sub

Il faut également que tu penses à initialiser ton score.

A+
0
Réponse 2 / 2
milexarc Messages postés 92 Date d'inscription lundi 25 février 2013 Statut Membre Dernière intervention 2 décembre 2016 8
1 oct. 2014 à 22:43
Le score reste toujours bloqué à 1 ... :/
Puis-je t'envoyer mon fichier pour que tu regardes si cela t'es possible ?

Merci
0
Mytå Messages postés 2973 Date d'inscription mardi 20 janvier 2009 Statut Contributeur Dernière intervention 20 décembre 2016 942
1 oct. 2014 à 23:37
Salut le Forum

Pour joindre un fichier : Tutoriel

Mytå
0
milexarc Messages postés 92 Date d'inscription lundi 25 février 2013 Statut Membre Dernière intervention 2 décembre 2016 8
2 oct. 2014 à 00:13
Merci :)
j'ai eu la réponse sur un autre forum ..

Merci encore pour votre aide !
0

Discussions similaires

Jeux similaires à amour sucré
aramis19875623 -
BmV -

70 réponses
Avis sur les sites pour Gagner de l'Argent ?
C0sm3tik -
Arnack -

8 réponses
jeux affichés sur le mauvais ecran
Julie22 -
Elia -

5 réponses
Jeu de société shazam
kouki -
Lice2laLoyre -

10 réponses
jeux ps4 compatible avec ps3
trek36 -
personne -

13 réponses