Comment remplir des label en serie avec nom variable?????Résolu

Question

Bonjour à tous, voilà ma question ne devrait pas vous poser beaucoup de problème. J'ai une serie de label avec comme non : lbl_piste1A, lb_piste1B, lbl_piste2A, lbl_piste2B, etc... Ce que je souhaite faire c'est remplir ces label automatiquement depuis une DB. Je remonte les données de la DB sans problème mais ma question est la suivante: Comment faire pour modifier le label concerné? J'aimerais qqchose dans ce genre:

rs.movefirst for i = 0 to 10 lbl_piste(i)A.caption = rs("CHAMP1") lbl_piste(i)B.caption = rs("CHAMP1") rs.movenext next i

J'ai beaucoup de label et j'ai pas trop envie de tous les modifier manuellement alors si l'un de vous pouvait me sauver la mise...lol... Merci d'avance

BasicInstinct · Accepted Answer

tu dois pouvoir faire un truc dans le style
 
      For Each ctrl In Me
            If Mid(ctrl.Name, 1, 9) = "lbl_piste" Then
                ctrl.Caption=rs("CHAMP1")
            End If
        Next

 BasicInstinct

JB76000 · Answer

Pourquoi tu n'utilises pas des label index&#233;s?

Jer