Discussion :

[zedude33]

Bonjour à tous,

En tant que tout nouveau membre, je me permets d'ouvrir cette nouvelle discussion afin de vous demander un peu d'aide.
Voilà, je ne programme depuis un mois ou deux et uniquement sous Visual Basic 6.0.

Je patauge un peu mais avec des exemples de codes, la consultation des F.A.Q, "Le Guide du programmateur Microsoft Visual Basic 6.0" et un tube d'aspirine contre le mal de crâne, j'arrive a peu près à m'en sortir. Sauf ici. Je seche et je ne sais plus trop comment faire, et c'est pour celà que je vous demande de l'aide.

Je vais essayer d'être le plus clair possible :
J'ai crée une Form nommée IoFrm.
Dans cette form j'ai crée 8 Labels nommés : Rb0Lbl, Rb1Lbl,Rb2Lbl, Rb3Lbl, etc... Rb7Lbl

J'aimerais, tout simplement, à partir d'une autre Form contenant une TextBox modifier la Caption de Rb[I]nLbl à partir d'une routine.
Autrement dit ce que j'essaie de faire c'est de modifier une Propriéte (en l'occurence Name), à partir d'une variable. Exemple:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

IoFrm.Rb0Lbl.Caption = "BlaBla"

Remplacé par ( ce qui ne fonctionne pas )

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Public Mavariable As String
Public VarPin As String
 
MaVariable = (VarPin & "Lbl")
IoFrm.MaVariable.Caption = "BlaBla"

Afin de n'avoir qu'a modifier le contenu de VarPin et de créer une seule routine.
J'ai fait beaucoup d'essais non concluants avec l'instruction Set et autres mais je ne m'en sort pas. Je seche et je ne sais plus où chercher.
Si quelqu'un pouvait m'aider.
Merci d'avance.

@+ Thierry

[Delbeke]

bon, je crois que ton idée est bonne, seulement vb ne sais pas faire ce genre de chose.
ce que tu peux faire, c'est un tableau de controles label. tu crées un label nommé rblbl, que tu copie avec ctrl+c, tu le colle sur ta feuille. la, vb va te prévenir qu'il existe dèjà un composant avec ce nom (rblbl) et te demanderas si tu veux créer un groupe de controles. réponds par l'affirmative. dans ta feuille tu auras alors deux composants portant le même nom mais ayant une propritété index différente. repete l'opération coller pour tous les labels dont tu as besoin .

Maintenant remplace ton bout de code suivant

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Public Mavariable As String
Public VarPin As String
 
MaVariable = (VarPin & "Lbl")
IoFrm.MaVariable.Caption = "BlaBla"

Par

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Public Mavariable As Integer
Public VarPin As String
 
MaVariable = VarPin 
IoFrm.rblbl(mavariable).Caption = "BlaBla"

[zedude33]

bon, je crois que ton idée est bonne, seulement vb ne sais pas faire ce genre de chose.
ce que tu peux faire, c'est un tableau de controles label. tu crées un label nommé rblbl, que tu copie avec ctrl+c, tu le colle sur ta feuille. la, vb va te prévenir qu'il existe dèjà un composant avec ce nom (rblbl) et te demanderas si tu veux créer un groupe de controles. réponds par l'affirmative. dans ta feuille tu auras alors deux composants portant le même nom mais ayant une propritété index différente. repete l'opération coller pour tous les labels dont tu as besoin .

Maintenant remplace ton bout de code suivant

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Public Mavariable As String
Public VarPin As String
 
MaVariable = (VarPin & "Lbl")
IoFrm.MaVariable.Caption = "BlaBla"

Par

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Public Mavariable As Integer
Public VarPin As String
 
MaVariable = VarPin 
IoFrm.rblbl(mavariable).Caption = "BlaBla"

Merci pour ta réponse.

C'est donc a ça que sert l'indexage?

@+ Thierry

[zedude33]

NI-CKEL
Tu ne peux pas savoir a quel point ce petit bout de code m'a aidé à comprendre quelques astuces.
Ca me permettre d'optimiser mes petites sources en créant des routines plutôt que de me taper toutes les solutions possibles.

"Les idées éclatent déjà dans ma tête comme du Popcorn !" citation de Loïs dans Malcolm in the Middle

Encore MERCI !!!

[Delbeke]

Content que cela ait pu t'aider. Personellement, le fait que vb.net ne gere pas de façon native les groupes de controle m'a fait rester en vb6 c'est te dire comme j'utilise cette façon de programmer !

[zazaraignée]

Salut les mecs, c'est la nana zaza

C'est parce que VB.Net est maintenant un véritable langage orienté objet (plutôt que basé objet comme était les versions précédentes). Chaque objet placé sur une feuille est en fait une instance d'objet et fait partie d'une collection. Lorsqu'on veut interroger (ou modifier) les instance d'un même type d'objet, on passe par sa collection plutôt que par une propriété Index.

Alors si c'est ok, faut pas oublier de cliquer sur