Pas très bon de mélanger du texte avec des nombres(même si celà fonctionne)
Fais plutot pour la lisibilité
Code:
1 2 3
NB1=Val(CumulMario.Caption) + NB1 'addition de nombres
CumulMario.Caption = str( NB1)'nombre en caractères
Ton idée est certainement bonne, mais lors de l'exec, quand je clique 1 fois le btn, il est affiché "0" dans le cumul alors que ça doit être "1". ;)
Citation:
Envoyé par iclic
Et ici
Code:
1 2 3 4 5 6 7 8 9 10 11
Sub Choix (index asinteger)
...
Dim i asintegerFor i = 0to2' ou le nombre de Label indexéIf nb(index) = 0then Label(i).Caption = ""'avec des Label indexésNextEndSub
Là, je t'avoue que je ne sais pas trop à quoi ça sert ???! :oops: