Je teste evb et tente d' adapter mes prog VB6.
Je ne comprend pas le principe du GOTO avec evb. Voici le teste d'un goto qui refuse de fonctionner.

if  resultat = 20 Then Goto fini
Label1.caption = " Le résultat n'est pas 20 "
fini:
Label1.caption= " Le résultat est correct "

end sub

Le message:
Compile error
Instruction attendue

Merci pour une réponse

Bonjour,
Pas de GOTO sous EVB. Il faut ruser...
Dans le cas cité bien sûr :
if  resultat = 20 Then
Label1.caption= " Le résultat est correct "
else
Label1.caption = " Le résultat n'est pas 20 "
endif
Sinon, exécuter une proc puis exit sub etc...
Bon courage


[i]patdan[/i] [:)]