Discussion :

[Didier77]

Bonjour,
j'ai écrit ce code avec la boucle while
et le compilateur m'indique une erreur de syntaxe
Est ce que quelqu'un la voit?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
While ((Asc(Prefix) >= 48) And (Asc(Prefix) <= 57))
 
Result = Rename(Temp)
StreetName = Result
Espace = InStr(Temp, " ")
If Espace = 0 Then
GoTo FIN
End If
Prefix = Mid(Temp, 1, Espace)
Temp = Mid(Temp, Espace)
i = i + 1
 
End While

[SfJ5Rpw8]

sur qu'elle ligne... ?

c'est quoi

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

GoTo FIN

et c'est pas

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

End While

mais

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

wend

[Didier77]

ok pour le wend

et le GoTo c'est pour sauter une partie de code
si tu met GoTo FIN
il faut qu'il y est dans ton code l'étiquette FIN:

et le programme repart de la

[SfJ5Rpw8]

oui je sais comment fonctionne un goto... mais bon c'est pas trop "joli"... on ne le réserve habituellement que pour la gestion d'erreur ( On Error goto ...)

modifie plutôt ta condition de while ... ) And Espace >0 ...

[Didier77]

ok c'est vrai que c'est pas terrible surtout si yen a plusieur
merci pour l'astuce