Objet et leurs noms...Résolu

Question

Bonjour à tous ! Me revoilà avec mes questions certainement très nul pour beaucoup d'entre vous, mais bon, il faut bien commencer un jour. (au fait, j'ai cherché sur Google... J'aime bien préciser). Voilà ma question; J'ai If button1.Text <> "" Then lbl1.text = "blabla" ... End If If button2.Text <> "" Then lbl2.text = "blabla" ... End If If button3.Text <> "" Then lbl3.text = "blabla" ... End If Y aurait-il possibilité de facitié de genre de choses en truc du style; Dim n If button1.Text <> "" Then bonjour() n=1 End If If button2.Text <> "" Then bonjour() n=2 End If If button3.Text <> "" Then bonjour() n=3 End If Sub Bonjour() lbl&n.text = "blabla" end sub Je ne sais pas si je me suis bein fait comprendre. J'ai essayé avec cette syntaxe, mais un objet ne peut pas être décomposé en "lbl & n" (dans cet exemple). Avez-vous une quelconque idée de comment je pourrai faire ? Merci beaucoup !

cs_casy · Accepted Answer

Quelque chose du genre : For i As Integer = 1 To n If Me.Controls("button" & i).Text <>"" Then Me.Controls("lbl" & i).Text = "blabla" Next ---- Sevyc64 (alias Casy) ----

# LE PARTAGE EST NOTRE FORCE # http://aide-office-vba.monforum.com/index.php

jsiegwald · Answer

Whoua ! Quelle réponse RAPIDE et EFFICACE !
Merci beaucoup Casy. 
Bravo à vbfrance par ailleurs. Très bon site (le seul de VB que je regarde !)

cs_Jack · Answer

Salut
En VB.Net, il faut gérer une collection de tes Labels
Un exemple ici : http://www.vbfrance.com/infomsg_NET-INDEX-CONTROLES_678471.aspx
(facilement trouvé parmi les questions du forum en tapant "Net Index")

Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés

<hr />Le savoir est la seule matière qui s'accroit quand on la partage (Socrate)

jsiegwald · Answer

En fait, les labels n'étaient qu'un exemple de mon code. J'ai tout un tas de calculs qui suivent. Mais merci !

jsiegwald · Answer

Et en fait, mes labels sont déjà créés. Je souhaite juste pouvoir raccourcir mon code.

jsiegwald · Answer

Excuse-moi Jack, j'ai vu un peu plus en détail le code de Casy et ta remarque sur les labels était effectivement très pertinente. Je viens d'essayer, et il faut également que je créer une collection de mes objets.
Merci pour ton aide !

Objet et leurs noms...

6 réponses

Votre réponse

Discussions similaires