Bonjour,
J'ai consulté plusieurs tuto pour remplacer les Goto et cela semble devenir complexe à la relecture du code et peu clair pour s'y retrouver.
Comment vous articuleriez votre Code pour éviter les goto, par exemple dans le cas suivant où il y aurait un tas de test de saisies:
Le but est d'obtenir un Code sans goto; bien sûr; mais aussi qu'il soit facilement consultable pour modifs.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21 Private button1_click ........................ If NOM.Text = "" Then MsgBox("ERREUR sur le NOM") goto fin End If If PRENOM.Text = "" Then MsgBox("ERREUR sur le PRENOM") goto fin End If If ADRESSE.Text = "" Then Msgbox("ERREUR sur l'ADRESSE") goto fin End If '--------------------------- Sauvegarde ------------------------------------------- ......... ......... ......... '----------------------- Fin de Sauvegarde --------------------------------------- fin: end sub
Merci de vos aides à tous.
Cordialement.
Partager