Определить какой из RadioButton выбран

[natcap]

Есть GroupBox, в нем куча RadioButton, как определить какой из них выбран кроме тупого перебора?
Раньше они хоть в массив собирались и можно было циклом, а сейчас это же просто вешалка все их перебирать

[1Steps]

Например так.

Код: Выделить всё

    Private Sub RadioButton1_Click(ByVal sender As Object, ByVal e As System.EventArgs) _
    Handles RadioButton1.Click, RadioButton2.Click, RadioButton3.Click
        Dim sname As String = DirectCast(sender, RadioButton).Name
        MsgBox(sname)
    End Sub

[MIT]

Перебор массива Controls элемента GroupBox не катит?

[natcap]

Перебор массива Controls элемента GroupBox не катит?

Спасибо, то что надо

[ImKarlas]

удобнее бы так:

Код: Выделить всё

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        AddHandler RadioButton1.CheckedChanged, AddressOf RadioButton_CheckedChanged
        AddHandler RadioButton2.CheckedChanged, AddressOf RadioButton_CheckedChanged 'для каждого radiobutton'а
    End Sub

    Dim SelectedRadionButtonName As String 'имя выбранного здесь

    Private Sub RadioButton_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs)
        Dim rbtn As RadioButton = sender
        SelectedRadionButtonName = rbtn.Text
    End Sub