OVH Cloud OVH Cloud

Génerer des noms d'éléments

1 réponse
Avatar
CrazyCat
Bonjour,

je découvre le VB.NET et j'ai déjà un petit soucis:

j'ai des liste de radio nommés "a_0", "a_1", "a_2", ..., "b_0", "b_1",
"b_2", ... et deux autres qui devraient permettre de faire la sélection
d'une série complète (a_0 à a_x ou b_0 à b_x).

J'ai donc ceci:
private sub A_all_CheckedChanged()
' la sub qui check/uncheck tous mes "a"
dim i as integer
dim cur_a as string
for i = 0 to 9
cur_a = "a_" & i
cur_a.checked = true
next
end sub

Bien entendu, ça ne marche pas et je n'arrive pas à voir comment faire
pour traiter non pas la chaine cur_a mais le radio qui a ce nom.

Merci de votre aide.
--
Découvrez Original War: http://www.original-war.org
Humour: http://www.chatfou.com
Tchattez en liberté: http://www.crazy-irc.net

1 réponse

Avatar
alan
Il y a une autre solution :
For Each xObj as Object in me.controls
If xObj.GetType Is GetType(RadioButton) then
Dim xRadio as RadioButton = CType(xObj, RadioButton)
if xRadio.Name.Startswith("a") then xRadio.Checked = True
End If
Next

"CrazyCat" a écrit :

Bonjour,

je découvre le VB.NET et j'ai déjà un petit soucis:

j'ai des liste de radio nommés "a_0", "a_1", "a_2", ..., "b_0", "b_1",
"b_2", ... et deux autres qui devraient permettre de faire la sélection
d'une série complète (a_0 à a_x ou b_0 à b_x).

J'ai donc ceci:
private sub A_all_CheckedChanged()
' la sub qui check/uncheck tous mes "a"
dim i as integer
dim cur_a as string
for i = 0 to 9
cur_a = "a_" & i
cur_a.checked = true
next
end sub

Bien entendu, ça ne marche pas et je n'arrive pas à voir comment faire
pour traiter non pas la chaine cur_a mais le radio qui a ce nom.

Merci de votre aide.
--
Découvrez Original War: http://www.original-war.org
Humour: http://www.chatfou.com
Tchattez en liberté: http://www.crazy-irc.net