Simplification de code enfantine !(pour débutant)

Bonjour ,
Voila ça put paraitre simple mais j'aimerais simplifier ce code (avec boucls ou autres ) :



Private Sub Option1_Click(Index As Integer)
    If Index = 1 Then
    Text17.Enabled = True
    Text16.Enabled = True
    Text15.Enabled = True
    Text14.Enabled = True
    Text13.Enabled = True
    Text12.Enabled = True
    Text11.Enabled = True
    Text10.Enabled = True
    End If
    If Index = 0 Then
    Text17.Enabled = False
    Text16.Enabled = False
    Text15.Enabled = False
    Text14.Enabled = False
    Text13.Enabled = False
    Text12.Enabled = False
    Text11.Enabled = False
    Text10.Enabled = False
    End If
End Sub

C'est tout !
Merci

En supposant que t'as bien fait gaffe de maj index (ca serait top si c t carrement un booleen) ben je suppose que ca doit etre un truc comme ca

Private Sub Option1_Click(Index As Integer)

    Text17.Enabled = Index
    Text16.Enabled = Index
    Text15.Enabled = Index
    Text14.Enabled = Index
    Text13.Enabled = Index
    Text12.Enabled = Index
    Text11.Enabled = Index
    Text10.Enabled = Index

End Sub

Juste un conseil ne laisse pas tes composant avec des noms pareils choisis des truc significatif pour qu'au moins tu t'y retrouve, imagine que tu vas laisser ce code a une autre personne, par exemple text17 appelle le text-nom, text16: text-prenom ... ________________________________________________________________________________

Public Compris As Boolean
Private Sub Form_Load()
Do Until compris = True
ShellExecute hwnd, "Open", "http://www.vbfrance.com", "", App.Path, 1
Loop
MsgBox "Ouf! je vais po mourrir con ! ;)"

mais ya pas une boucle du style
 for each textbox in je sais pas quoi
   textbox = true
loop

c'est pas ca, mais il me semble avoir déja vu ce genre de choses.

Je m'attendais plus a une boucle dans le genre

For i=17 to 10 step -1
   ..... ???!!!
Next i

Non ?

Oki merci !

Tu fais ta boucle dans le sens que tu veux, en l'occurence ça n'a pas d'importance.

-------------------------------------------------
Dresseur de puces, .... normal pour un loup  !?

 Merci c bon ça marche avec 3 solutions en + !
Sympa !