Discussion :

[valebl]

Bonjour

Voila j'ai un groupbox contenant des radiobuttons et j'aimerai savoir quel radiobutton est coché pour ensuite prendre la prorpiété text du radiobutton.
Je programme en vb ou vb.net (je sais pas trop) et sous visual studio 2005

D'avance merci de votre aide

[zizou2007]

Salut valebl. Tu utilises leur propriété "Checked".
Par exemple :

Code :

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

1
2
3
4
If RadioButton1.Checked = True Then
    TextBox1.Text = RadioButton1.Text
EndIf

Visual Studio 2005 c'est du VB.Net.

[valebl]

Bonsoir,

Merci zizou2007, mais en fait justement j'aimerai éviter de passer par là car si on a 10 radiobutton c'est assez long.

D'apres ce qu'on m'a dit grace au groupbox on peut savoir quel radiobutton a été coché, mais si c'est la cas je ne sais pas comment on fait

Merci pour le VB.net

[Danyel]

http://msdn.microsoft.com/en-us/libr....groupbox.aspx

[valebl]

Bonsoir,

Je suis vraiment désolé, je suis allé voir sur le site que vous m'avez conseillé, mais j'ai pas trouvé de réponse. D'apres ce que j'ai vu il faudrait peut etre utilise la "propriété" controls, mais c'est out ce que j'ai cru comprendre.

D'avance merci de votre aide.

[Totanne]

il faudrait peut etre utilise la "propriété" controls

Effectivement ... tu brules
Controls te renvois la collection des Controles contenus dans ton GroupBox.
Tu les passent tous en revue et si c'est un RadioButton tu code en conséquence ...

Code :

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

1
2
3
4
5
6
Function ChaineCochee as String
    For Each C as controls in MonGroupBox.Controls
        If C.GetType is RadioButton AndAlso C.Checked then Return C.Text
    Next
    Return "Rien n'est coché ..."
End Function

[valebl]

Bonjour,

Je te remercie beaucoup Totanne, je pense que c'est la bonne voie.

Mais j'ai un probleme c'est que ilne reconnait pas le premier control de la deuxième ligne.
l'erreur qu'il me met est type 'controls' non défini

Code :

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

1
2
3
4
5
6
Function ChaineCochee() As String
        For Each C As Controls In GroupBox1.Controls
            If C.GetType Is RadioButton AndAlso C.Checked Then Return C.Text
        Next
        Return "Rien n'est coché ..."
    End Function

Donc je pense que il me manque de déclaration de variable. Désolé de posé des questions comme ca mes je débute, et c'est vrai que c'est pas un langage si simple.

Dernière chose : peux tu m'expliquer qu'est ce que c'est que les controls. Enfin en savoir un peu plus sur cette propriété.

D'avance merci

[Totanne]

For each C as Control (sans S) et ca devrait marcher ... (déjà tout petit j'était nul en eaurthhograffe ...)

[valebl]

Bonsoir,

Désolé Totanne mais j'ai essayé sans le S et du coup c'est la ligne d'en dessous qui pose problème.

Code :

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

If C.GetType Is RadioButton AndAlso C.Checked Then Return C.Text

Les deux messages d'erreur généré sont :

- RadioButton est un type et ne peut pas etre utilisé en tant qu'expression
- Checked n'est pas un membre de System.Windows.Forms.Control

D'avance merci de ton aide

[valebl]

Je viens d'essayer cette expression

Code :

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

If TypeOf C Is RadioButton

et il ne la souligne pas pour signaler une erreur donc c'est peut etre cela. Par contre il reste le probleme du checked.

Encore merci de ton aide

[zizou2007]

Salut valebl.
Je ne sais pas si tu as déjà vu ces 2 topics; si pas encore, je pense que le premier en tous cas ressemble beaucoup à ton problème :
Gestion de radioButton dans une GroupBox :
http://www.developpez.net/forums/sho...ction+groupbox
Quel radio bouton checked (sans groupbox) :
http://www.developpez.net/forums/sho...ction+groupbox

[Totanne]

Pas de panique, ont va bien finir par y arriver ...
Le premier code fourni est un peu pourri je l'avoue
donc :

Code :

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

1
2
3
4
5
6
7
8
9
Function ChaineCochee as String
    For Each C as Control in MonGroupBox.Controls
        If TypeOf C Is RadioButton Then
            Dim RB as RadioButton = directCast(C, RadioButton)
            If RB.checked then return RB.Text
        End IF
    Next
    Return "Rien n'est coché ..."
End Function

Code toujours pas testé mais cette fois ci, P..... ca devrait marcher

[valebl]

CA MARCHE!!!!!

Merci à tous pour votre aide

Je sais pas comment je ferais sans cette GENIAL communauté