probleme de code if end

bonjour a tous voila le code:

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20

Private Sub Command1_Click()   valeur = InputBox("choisis un nombre entier") If valeur = 2203 Then MsgBox ("vous avez gagné sacré veinard") End   Else If valeur > 2203 Then MsgBox ("votre nombre est trop grand. Réessayez!!!") InputBox ("choisis un nombre entier")   Else If valeur < 2203 Then MsgBox ("votre nombre est trop petit. Réessayez!!!") InputBox ("choisis un nombre entier")   End If   End Sub

---

vb6 m'affiche un message d'erreur disant qu'il n'y a pas de end if alors que j'en ai mis un. j'attends toutes réponses de votre part et je vous remercie d'avance.

Il faut que tu mette des EndIf pour tous tes If, pas uniquement le dernier.

ok sa marche merci:D

Mets un titre plus explicite à ton topic la prochaine fois.