Problème de comptage par click
Bonjour à tous,
J'avais déjà expliqué que je faisais un petit programme pour un vote, mais je voulais que quand on clique sur un bouton au bout de x fois, tout en cumulant le nombre de click sur ce bouton, il soit ajouté 1 dans un autre cumul.
Cette image est peut-être plus significative :
http://qi98.free.fr/temp/err_vb.jpg
Le problème est que le cumul par exemple de Mario, n'est pas égal à son nombre de clique.
J'ai essayé plusieurs solutions mais pas de solution.
Je vous mets une partie du code qui vous expliquera mieux :
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
| Private Sub Choix(index As Integer)
Select Case index
' //////////// Mario ////////////
Case 0
NB(1) = NB(1) + 1
If NB(1) = 3 Then
LabMario = NB(1)
LabCumulGueule = Val(LabCumulGueule) + 1
Else
LabMario = NB(1)
LabCumulMario = Val(LabCumulMario) + 1
' Cumul = NB(1): LabCumulMario = Val(LabCumulMario) + Cumul
End If
' //////////// Gueule d'amour ////////////
Case 1
NB(2) = NB(2) + 1
LabGueule = NB(2)
LabCumulGueule = Val(LabCumulGueule) + 1
... |
Voulez-vous me donner une solution pour que le cumul d'un bouton (ici Mario) soit le même que le nombre de fois le bouton cliqué ?
Je vous demande ça parce que je n'arrive pas à trouver la solution.
Merci de vos réponses.
Cordialement.
Sabrimi
C'est bon, j'ai compris pourquoi ça n'était pas juste, donc, c'est résolu !
