Menu

Substitut à GoTo [Résolu]

Messages postés
3
Date d'inscription
lundi 15 décembre 2008
Dernière intervention
3 novembre 2018
- 2 nov. 2018 à 21:35 - Dernière réponse :
Messages postés
3
Date d'inscription
lundi 15 décembre 2008
Dernière intervention
3 novembre 2018
- 3 nov. 2018 à 11:28
Bonjour,
Je comprends bien les préventions contre GoTo, mais je dois être un peu obtus, car je vois mal comment je peux me passer de GoTo pour écrire le programme dont l'organigramme simplifié est joint.

Si vous avez des solutions, je suis preneur, merci d'avance.


Afficher la suite 

Votre réponse

2 réponses

Messages postés
22159
Date d'inscription
mardi 11 septembre 2007
Statut
Contributeur
Dernière intervention
18 novembre 2018
- 2 nov. 2018 à 22:46
0
Merci
Bonjour,

sans la feuille pour se rendre compte ni les explications avec le contexte ça ne sera pas forcément exact, il y aura sans doute des détails à régler.
Un exemple de structure:
Sub sansGoto()
    ' récup données / calcul s
    '...
    If s = True Then Exit Sub
    ' remplir matrice
    '...
    Do
        ' nouvelle ligne
        '...
        If testCroix = True Then
            If avecSans = True Then
                ' imp normale
                fini = "???"    ' évaluer fini
            Else
                If plageOk = True Then
                    ' imp plage
                    '...
                End If
            End If
        End If
    Loop Until fini
    ' imp bordure
    '...
End Sub

eric


Commenter la réponse de eriiic
Messages postés
3
Date d'inscription
lundi 15 décembre 2008
Dernière intervention
3 novembre 2018
- 3 nov. 2018 à 11:28
0
Merci
Merci Eric, je vois le principe, je vais essayer de mettre en place !
Commenter la réponse de jacsimo