Bonjour, mon programme comporte dans un module trois procédures SUB

La procédure SUB BONJOUR()

La procédure SUB EXAMINE()

La procédure SUB PARTIE()


La procédure Bonjour contient un SELECT ET END SELECT. Une variable déclarée public prends la valeur vraie lorsque l'un des case est respectée.

La procédure EXAMINE fonctionne exactement comme la procédure Bonjour. Elles sont quasiment identiques à part que les variables changent ainsi que les cases



Venons au problème...

Dans ma procédure SUB PARTIE, nous trouvons le code suivant :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
 
Sub partie_en_cours()
 
        If validation(0) = False Then
            bonjour()
        End If
        examine()
    End Sub
Le problème est que ça ne marche pas ! En faites, il me renvoie dans la première procédure l'instruction CASE ELSE même si le mot cherché est le bon. Si le mot cherché est le bon, la variable passe malgré tout à TRUE et du coup la procédure EXAMINE() démarre...

Ensuite, si dans le code ci-dessus, j'enlève la procédure EXAMINE(), la procédure BONJOUR() fonctionne parfaitement !

En résumé : Sans EXAMINE aucun problème ! Avec EXAMINE, le sub BONJOUR fait un peu ce qu'il veut... loool

C'est grave docteur ?